
26.11.2012, 08:45
|
 |
Let Me Show You
|
|
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
|
|
Unit1.rc:
Код:
ComboBox RCDATA "Unit1.txt"
Код:
var
ResourceStream: TResourceStream;
begin
ResourceStream:=TResourceStream.Create(HInstance, 'ComboBox', RT_RCDATA);
try
ComboBox1.Items.Text:=PChar(ResourceStream.Memory);
finally
ResourceStream.Free;
end;
end;
__________________
Пишу программы за еду.
__________________
|