Forum: Object-Pascal / Delphi-Language
Delphi
by ErazerZ,
14. Mai 2006
var
f: TFileStream;
s: string;
begin
s := 'heyyy';
f := TFileStream.Create('c:\meinedatei.txt', fmCreate);
f.WriteBuffer(Pointer(s)^, Length(s));
f.Free;
Forum: Object-Pascal / Delphi-Language
Delphi
by ErazerZ,
14. Mai 2006
machst zb ne Memo und ladest dort den Text und speicherst
Memo1.Text := sText;
Memo1.Lines.SaveToFile('c:\meinetxt.txt');
oder per filestream
uses Classes;
var
Forum: Object-Pascal / Delphi-Language
Delphi
by ErazerZ,
13. Mai 2006
var
i, iTemp: Integer;
sText: String;
const
MeinArray: Array of Byte = (1,3,2,0,0,0,2,3,1,3,2,1,1,1,3,1,0,0,2,0,1,0,3,2,3,3,1,0,1,2,3,4,5,6,7);
InsertPos = 7;
begin
sText := '';
for i := 0 to sizeof(MeinArray) -1 do
begin