Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Position von Dialog (https://www.delphipraxis.net/109244-position-von-dialog.html)

SaFu 27. Feb 2008 20:15

Re: Position von Dialog
 
ok anscheinend komm ich nicht in die funktion rein
es wird nichts angezeigt mit einem showmessgae

taaktaak 27. Feb 2008 20:26

Re: Position von Dialog
 
Moin, Moin,

ich habe für diese Zwecke immer folgendes verwendet, um z.B. einen OpenDialog zu positionieren:

Delphi-Quellcode:
procedure Tfo~~.OpenDialog1Show(Sender:TObject);
var Rect : TRect;
begin
  with Sender as tOpenDialog do begin
    GetWindowRect(Handle,Rect);
       MoveWindow(Handle,
                  0,                          // new Left
                  0,                       // new Top
                  succ(Rect.Right -Rect.Left),
                  succ(Rect.Bottom-Rect.Top),
                  true );
    end;
end;
Das funktioniert eigentlich immer - dachte ich! Es funktioniert aber offenbar nur, wenn in Options des Dialogs die Eigenschaft ofOldStyleDialog=true ist. Als alter Mann nutze ich immer diese Option - hihihi. Läßt man den Dialog aber im modernen Stil erscheinen, funktioniert die Positionierung nicht. Vielleicht ist das auch der Grund, das eure Lösungen nicht funktionieren?!

SaFu 27. Feb 2008 20:30

Re: Position von Dialog
 
ok ich versuche es ja gerdae beim Colordialog und da gibt es diese eigenschaft garnicht also geht es damit anscheinend nicht.

taaktaak 27. Feb 2008 20:44

Re: Position von Dialog
 
Ahh, bei mir funktioniert das (mit meinem Ansatz) beim ColorDialog schon. Verwendet deine Delphi-Version dann wohl schon einen NEUEN ColorDialog?! Aber sicherlich gibt es auch für die "neuen Dialoge" einen Weg - leider kenne ich ihn nicht :(

SaFu 27. Feb 2008 20:49

Re: Position von Dialog
 
Kennt vielleicht irgendjeman noch einen Weg.

Ich Frage mich immer nur wie Ihr das sonst macht, überlasst Ihr das Windows wo es aufplopen soll oder könnt Ihr das alle ohne nachzufragen. :gruebel:

Bin ich so blöd ich weiss ich habe immer viele Fragen aber im gegensatz zudem was ich alles selber schreibe und finde, sind es noch recht wenig Fragen :mrgreen:

SaFu 27. Feb 2008 20:53

Re: Position von Dialog
 
Gut beim Normalen Opendialog funzt es jetzt bei mir auch.

Nur beim Colordialog nicht???

stahli 27. Feb 2008 20:58

Re: Position von Dialog
 
Was liefern denn
Form6.Left + (Form6.Width div 2) - (W div 2),
Form6.Top + (Form6.Height div 2) - (H div 2),
zur Laufzeit zurück?

Wird CallWindowProc aus der Unit Windows aufgerufen?

SaFu 27. Feb 2008 21:03

Re: Position von Dialog
 
wie gesagt es kommt nicht aus der funktion zurück

Aber dein code funzt bei den anderen Dialogen ganz gut, muss jetzt nur noch gucken ob es beim Fontdialog geht.

Für das Colordialog muss ich mal schauen ob ich nochwas finde habe aber schon überall im Forum gesucht, anscheinen hatte noch niemand das Problem.

SaFu 29. Feb 2008 20:03

Re: Position von Dialog
 
Hi

wollte nur nochmal nachfragen ob da jemand ne Lösung hat.

Habe jetzt fetgestellt das der Code von stahli bei den meisten Dialogen funktioniert nur beim Font- Color- und printdialog nicht.

Hat jeman vielleicht eine Lösung.

Gruß Sascha


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:27 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz