Registriert seit: 29. Okt 2004
Ort: Halle
462 Beiträge
|
Re: Speichern von Editfeldern in Datei
19. Mär 2006, 03:22
Delphi-Quellcode:
procedure AddToBatch(FileName, Command: String);
var
Datei : System.Text;
begin
AssignFile(Datei, FileName);
if FileExists(FileName) then
Append(Datei)
else
ReWrite(Datei);
Writeln(Datei, Command);
Closefile(Datei);
end;
Und Aufrufen tust Du es so
AddToBatch('.\batchfile.bat', 'net send '+Edit1.text+' '+edit2.text);
und Willkomen in der DP.
|