Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.
Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...
(*
Load RTF file from resource:
file as a RCDATA
resource.
The following example shows this with an RTF file .
called textres.rc and put the
following line in it:
provided with Delphi.
to include the
compiled resource (.RES) file into
your executable, which can be done with the
{$R} compiler directive.
eine
Exe-Datei einbinden.
Das folgende Beispiel zeigt, wie man einen RTF-Text aus
einer Ressource ladt und in einem TRichEdit anzeigt.
You can store any kind of
Create a text file
TESTDOC RCDATA "textdoc.rtf"
Next, compile that using the Borland Resource Compiler,
which is
brcc32.exe textres.rc
Your next step is
*)
(*
Man kann eine beliebige Datei als RCDATA Ressource in
Erstelle zuerst eine Datei "textres.rc" mit folgendem Inhalt:
TESTDOC RCDATA "textdoc.rtf"
Kompiliere diese mit brcc32.exe:
brcc32.exe textres.rc
Es wurde nun eine textres.res Datei erzeugt.
*)
implementation
{$R *.dfm}
{$R textres.res}
// <---- your resource file!
procedure
TForm1.Button1Click(Sender: TObject); var
rs: TResourceStream;
begin
rs := TResourceStream.Create(hinstance, 'TESTDOC', RT_RCDATA);
try
Richedit1.PlainText := False;
TempStream.Position := 0;
Richedit1.Lines.LoadFromStream(rs);
finally
rs.Free; end
; end
;