Mega Code Archive
Use RCDATA resources in Kylix
<![CDATA[
Title: use RCDATA resources in Kylix?
{
Resourcedateien (*.res) für Kylix können mit dem Resourcecompiler
brcc32.exe von Delphi generiert werden.
Siehe dazu Tip http://www.swissdelphicenter.ch/de/showcode.php?id=1049
Kylix unterstützt keine benutzerdefinierte Resourcetypen. Deshalb müssen
alle Resourcen, die keinen vordefinierten ResType haben, als RCDATA
definiert werden.
Beispiel mit TResourceStream
Speichert die Resource (in userdefined.res) mit den Namen MYRES1 in die
Datei test.txt
}
{
To create resource files (*.res) for Kylix you can use the Delphi
brcc32.exe resource compiler.
Take a look at ;http://www.swissdelphicenter.ch/en/showcode.php?id=1049
Kylix dont support userdefined resourcetypes. Therefore you have to define
all resources without a predefined ResType as RCDATA.
Example with TResourceStream
Saves the resource (in userdefined.res) with the name MYRES1 to the file
test.txt
}
uses
SysUtils, Types, Classes, Variants, QGraphics, QControls, QForms, QDialogs,
QStdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.xfm}
{$R userdefined.res}
procedure TForm1.Button1Click(Sender: TObject);
var
stream: TResourceStream;
begin
stream := TResourceStream.Create(HInstance, 'MYRES1', RT_RCDATA);
with TFileStream.Create('test.txt', fmCreate) do begin
CopyFrom(stream, stream.Size);
Free;
end;
end;
]]>