Hallo!
Ich lade mit dem Quellcode Bilder auf nen FTP hoch! Aber wenn ich das mache und er ien gr. Bild hochlädt und ich dann das Fenster kurz wechsel, z.B: in den Exploerer und danach wieder in das Porgramm, dann wirkt es so, als wenn es sich aufgehängt hat, es läuft aber weiter! Wie kann man das machen, dass man wärend des uploads das prgramm trotzdem noch benutzen kann!? meinet wegen auch nur das fenster verschieben?

markieren

Delphi-Quellcode:

procedure TForm1.Upload_ButtonClick(Sender: TObject);
begin
  Upload_Label.Visible := True;
  dir := ShellListView1.SelectedFolder.PathName;
  datei := ExtractFilename( ShellListView1.SelectedFolder.PathName);
  FTP.Put(dir,datei);
end;

Hallo,

arbeitest Du mit den Indy FTP Komponenten?
Dort gibt es ein Ereignis OnWork dort könntest Du ein
Application.processMessages einbauen.

Oder Du lagerst Dein FTP Aufruf in eine Thread aus.

Grüße
Klaus

Hallo!
Ja, arbeite mit Indy!
Habe shcon was in OnWork

markieren

Delphi-Quellcode:

procedure TUpload.FTPWork(Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCount: Integer);
begin
  StatusBar1.Position := AWorkCount;
end;

Was müsste ich denn da noch einbauen? Wofür ist eingentlich das "Application.processMessages "?
Gruß
Dominik

Application.ProcessMessages sorgt dafür, das die Anwendung angefallene Messages erhält und drauf reagieren kann (Mouse-Bewegungen, Klicks), einfach gesagt

Zitat von SMERK:

Wofür ist eingentlich das "Application.processMessages "?

Kennst Du die F1-Taste beim Delphi?
Kennst Du MSDN?
Kennst Du google?

Da kannst Du Dir die Frage selber beantworten...

@Porgman: Danke für Deine NETTE Hilfe und Erklärung!

Klappt nun alles!