Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Jan,
4. Dez 2005
Hallo Robert,
hast du meinen Beitrag direkt vor deiner Frage gelesen?
Mit clienttoscreen und mit clientwidth und clientheight klappt das ganze doch jetzt einwandfrei.
Da muss ich garnichts mehr großartig berechnen.
Aber danke für deine Bemühung.
Gruß
Jan
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Jan,
3. Dez 2005
Hallo,
hab nochmal intensiv und mit abgewandelten Suchbegriffen und ich weniger eindeutig benannten threads hier gesucht und bin auf die function clienttoscreen gestoßen.
Mit folgendem Code geht das ganze jetzt:
muh.x:=Round(ClientWidth/2);
muh.Y:=Round(ClientHeight/2);
muh:=form1.ClientToScreen(muh);
maus.CursorPos:=muh;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Jan,
3. Dez 2005
Hallo Luckie!
Danke für den Tip,
allerdings bekomme ich da andere Werte raus, als die, die ich durch ausprobieren an meinem Rechner herausbekommen habe.
Ich bekomme jetzt statt der 4px für den Horizontalen Rahmen und der 26px für den vertikalen, oberen Rahmen mit folgendem Code:
muh.x:=Round(ClientWidth/2)+form1.Left+GetSystemMetrics(SM_CXBORDER);
...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Jan,
3. Dez 2005
Hallo DPler!
Ich habe folgendes Problem:
Ich will den Mauszeiger in der Mitte des Forms platzieren.
bisher mache ich das so:
var muh : Types.TPoint;
maus : TMouse;