Soviel, kann ich jetzt auf die schnelle nicht verarbeiten :O
Aber danke für die Tipps.
Das mit den Konstanten bei Funktinen ist wirklich sehr hübsch.
Zitat von
himitsu:
Delphi-Quellcode:
TDownloadWork = procedure(Download : TDownload) of object;
TDownloadBegin = procedure(Download : TDownload) of object;
TDownloadEnd = procedure(Download : TDownload) of object;
oder eventuell gleich nur eine CallbackProzedur für alles
Delphi-Quellcode:
TDownloadState = (dsBegin, dsWork, dsEnd);
TDownloadCallback = procedure(const Download : TDownload; State: TDownloadState) of object;
wo die Definition doch gleich ist, mach doch einfach eine Definition raus.
TDownloadCallback = procedure(const Download : TDownload) of object; ... Danke
PS: Die Funktion GetSizeName habe ich selbst nur hier aus dem Forum gestohlen
bei der Mehrfachverzweigung habe ich Begin End genommen weil es ohne nicht ging?
Und muss man da nicht normalerweise auch break benutzen, da es nur dumme DOS Sprungmarken sind ?