Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by semo,
1. Jun 2008
so sollte es klappen:
procedure TForm1.Button1Click(Sender: TObject);
var
Start: string;
Ziel : string;
begin
Start := IncludeTrailingPathDelimiter(FileListBox1.Directory) + FileListBox1.items;
Ziel := IncludeTrailingPathDelimiter(FileListBox2.Directory) + FileListBox1.items;
MoveFile(PChar(Start), PChar(Ziel));
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by semo,
1. Jun 2008
du musst du von hand einfügen...
procedure TForm1.Button1Click(Sender: TObject);
begin
movefile(PCHar('C:\test1.txt'), PCHar(C:\test2.txt));
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by semo,
1. Jun 2008
hausaufgaben lösen wir hier nicht.
wobei hast du denn genau probleme?
ein bisschen eigenleistung würden wir ja schon gern sehen...