Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Res Файлы

Автор: Гость_Николай 3.5.2005, 09:47

Народ извените за вторжение мне нужна ваша помощь!!!
У меня тут такая проблема я хочу создать программу для тестирования (Курсовик)
Вопросы у меня набираются в RichEdit и я их сохраняю как rtf Файла но для теста несодавать же n -ное кол-во файлов я их решил програмно затолкать в res затолкать затолкал а вот считать возникли проблемы.
Может кто знает как считывать данные напрямую из *.Res файла как это делает Restarator и другие проги.
Хотел всё в Ini но у него на запись потока нет ограничений а вот на чтение встрял 1280 байт инеболее ну неразбивать же их на части.

Автор: Alex 3.5.2005, 10:26

http://vingrad.ru/DELPHI-SRC-000003
Добавлено @ 10:29
http://forum.vingrad.ru/index.php?showtopic=21183&st=15

Автор: Гость_Николай 3.5.2005, 14:57

Alex

Теперь проблема Пытаюсь загрузить файл но он его не создает просто пролетает и всё
Неработает код:

Код


var
 hUpdateRes: THandle;
begin
 hUpdateRes:= BeginUpdateResource('Project1.dll', FALSE);
 notLang:= True;
 try
   if not LoadFileResource(hUpdateRes, 'RT_RCDATA','W1','B.Rtf') then
   showMessage('');
 finally
   notLang:= False;
 end;
 EndUpdateResource(hUpdateRes, FALSE);
end;

может у тебя есть пример как загрузить и выгрузить ресурсы из DLL

Автор: Poseidon 3.5.2005, 15:19

Цитата

может у тебя есть пример как загрузить и выгрузить ресурсы из DLL

Код

{$IFDEF WIN32}  
const BadDllLoad = 0;  
{$ELSE}  
const BadDllLoad = 32;  
{$ENDIF}  

procedure TForm1.Button1Click(Sender: TObject);  
var  
  h : THandle;    
  Icon : THandle;  

begin  
  h := LoadLibrary('RESTEST.DLL');  

  if h <= BadDllLoad then  
    ShowMessage('Bad Dll Load')  
  else begin  
    Icon := LoadIcon(h, 'ICON_1');  
    DrawIcon(Form1.Canvas.Handle, 10, 10, Icon);  
    FreeLibrary(h);  
  end;  
end;

Взято с http://www.drkb.ru/drkb23.chm

Автор: Guest 3.5.2005, 15:32

Poseidon

Это пример выгрузки иконки из Dll
А как загрузить файл в неё причем любой с типом RCDATA