Also wenn ich's so schreibe:
Delphi-Quellcode:
procedure TForm1.XiButton1Click(Sender: TObject);
var Datei, Ziel:PChar;
begin
Memo1.lines.Add ('Update.. bitte einen moment warten...') ;
Memo2.Lines.LoadFromFile('C:\Updater\File1.txt');
Memo3.Lines.LoadFromFile('C:\Updater\File1Ziel.txt');
Datei := memo2.text; // ??
Ziel := memo3.text; // ??
UrlDownloadToFile(nil, Datei, Ziel, 0, nil);
// --------------------------------------------------
ProgressBar1.Position:=ProgressBar1.Position+100;
memo1.lines.Add ('==================================');
memo1.lines.Add ('Download beendet!');
memo1.lines.Add ('Vielen dank für die benutzung des Updaters!');
memo1.lines.Add ('Update Komplett!');
end;
Dann kommt die fehlermeldung : "Incompatible types TCaption and PAnsi Char" !!!