73%
22%
19%
11%
6%
Freitag, 28. Januar 2005, 20:09
Wenn Temoömar dann:
Wenn nicht. Ansonsten kenn ich nur das hier.
Dammit speicherst du alles von Memo1 in einer Textdatei auf C:
Zitat
function GetTempFile: String;
var Path:array[0..Max_Path] of char;
s: array[0..Max_Path] of char;
i: integer;
begin
i:=GetTempPath(Max_Path,Path);
i:=GetTempFileName(Path, '~tm', 0, s);
Result:=s;
end;
Wenn nicht. Ansonsten kenn ich nur das hier.
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.SaveToFile('C:\Datei.txt');
end;
Dammit speicherst du alles von Memo1 in einer Textdatei auf C:
