DLL с ресурсами типа String
STRINGTABLE
{
00001, "String1"
00002, "String2"
}
Затем компилируем его при помощи BRCC32 MyString.rc, получается файл ресурсов MyString.res. Далее делаем DLL:
library MyString;
{$R MyString.res}
begin
end.
Компилируем при помощи Delphi и получаем DLL MyString.dll. Теперь ее можно использовать в своих программах:
var
h: THandle;
S: array [0..255] of Char;
begin
h := LoadLibrary('MYSTRING.DLL');
if h <= 0 then
ShowMessage('Не могу загрузить Dll')
else
begin
SetLength(S, 512);
LoadString(h, 1, @S, 255);
FreeLibrary(h);
end;
end;
Комментарии