Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by xZise,
29. Aug 2006
Anso ich nehme an er würde gehen (Es geht ja auch über Timer ;))...
Gibts denn eine Prozedur, die von der Form kurz nach dem Anzeigen ausgeführt wird?
Oder würde es rein theroretisch so gehen:
procedure TForm1.Show;
begin
inherited;
GetPixels...;
end;
?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by xZise,
29. Aug 2006
Ja! Es ist schon so mit dem Umrechnen, ABER er nimmt immernoch den Farbpixel von dem Fenster darunter (getestet).
Und ich verstehe nicht, das Problem mit dem Umrechnen, es ist erwähnt, und könnte so sein, aber ist zu 99,99% nicht der Fehler.
Und dann möchte ich noch darauf hinweisen, dass ich es in "onShow" gepackt habe und ich keinen Timer verwende (auf der Mainform gabs einen Timer, find...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by xZise,
23. Aug 2006
Nicht immer!
Wenn Point(0, 0) die Koos des Fensters ist, dann muss ich es nicht umrechnen.
Was mir aufgefallen ist: Die Farbe, ist die Farbe der Fenster dadrunter. (Also sozusagen, das was man ohne den Fenster sehen würde)
Vielleicht liegts daran, dass das Fenster nicht die Mainform ist?
PS: Scheiß T-Online... Weil ich umgezogen bin habe ich 2 Wochen kein I-Net :( Total Müll, wenn man...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by xZise,
9. Aug 2006
Nein das ist es leider nicht!
Ich habe Top/Left der Form auf 0 gesetzt (fsNone) und es geht immernochnicht :( Schade...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by xZise,
8. Aug 2006
Ich habe folgenden Code:
procedure TfrmEId3.FormShow(Sender: TObject);
var
hDesk : HWND;
hdcDesktop : HDC;
i : Byte;
begin
hDesk := GetDesktopWindow;
hdcDesktop := GetWindowDC(hDesk);