Windows Progress Dialog Wrapper

[uligerhardt]

Zitat von himitsu:

Und wenn du bei StartProgressDialog und Co. wieso nil übergibst, dann deklariere es besser als pvResevered: PPointer {ohne var} und übergib ein Richtiges nicht soein "gahacktes" NIL.

Ich denke, auch du hast eine Indirektion zuviel. Das ist weder Referenz auf Zeiger noch Zeiger auf Zeiger, sondern einfach Zeiger - siehe den letzten Absatz in meiner ersten Antwort.

Zitat von himitsu:

Man kann sich das Leben auch schwerer machen, als nötig.
(und wenn wirklich mal jemand so krankhaft bescheuert sein sollte und global im ganzen Projekt die vollständige boolische Auswertung aktiviert ... selber Schuld)

Shit happens.

Zitat von himitsu:

Ach ja, abgesehn von ParentWindow sollten der letzte Public-Block wohl eher ein Published sein.
Ansonsten kann man das TComponente als Vorfahr garnicht ausnutzen, denn es ließe sich zwar auf die Form pappen, aber einstellen könnte man dort nicht viel.

Ist ja keine Komponente, sondern nur ein TObject . Da kannste publishen, bis du schwarz wirst.

Zitat von himitsu:

Und deine TdxProgressDialog ist nicht für Delphis bis D2009 geeignet, da das Interface mit Unicode deklariert ist, aber dort String und PChar kein Unicode sind, was dann nicht mehr zusammenpaßt.
Deklarier dir einfach eigene "String"- und "PChar"-Typen, welche ab D2009 string und PChar oder UnicodeString und PWideChar bleiben, aber bis D2007 als WideString und PWideChar deklariert sind.

Hab ich grad gemerkt, als ich es mal mit D2007 ausprobieren wollte. Ich hab jetzt mal alle PChar durch PWideChar und alle string durch ein typedef auf WideString ersetzt, dann läuft's.

[Zacherl]

Oh man, ich sollte wirklich nicht mehr programmieren, wenn ich länger als 24h wach war

Zitat von himitsu:

Wenn der Dialog ausgeblendet wird, sollte FDialog auch freigegeben werden und das nicht erst im Destroy

Das wollte ich nicht, da dann ja nicht mehr auf HasUserCanceled zugegriffen werden kann. Aber dein korrigierter Code umgeht das Problem ja ganz geschickt.

Zitat von himitsu:

Ach ja, abgesehn von ParentWindow sollten der letzte Public-Block wohl eher ein Published sein.
Ansonsten kann man das TComponente als Vorfahr garnicht ausnutzen, denn es ließe sich zwar auf die Form pappen, aber einstellen könnte man dort nicht viel.

Ist ja auch von TObject abgeleitet und war nicht als visuelle Komponente geplant.

Zitat von himitsu:

PS: Monitore sind heutzutage meist nicht mehr 15" ... Tools > Optionen > Editor-Optionen > Anzeige > rechter Rand z.B. mindestens auf 120 stellen.
(120 = FullHD + links und rechts OI, Tool-Palette, Projektionen usw.)

Mein Notebook, auf dem ich teilweise arbeite, hat nur 17", deshalb lasse ich die Randeinstellung normalerweise auf default

Edit: Habe mal ein paar der Änderungsvorschläge umgesetzt. Cancel() war vielleicht etwas irreführend. Diese Methode habe ich in Close() umbenannt, da es prinzipiell gar keine Möglichkeit gibt den Dialog ohne den Cancel Button abzubrechen.