Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - Fenster lässt sich bei "none" nicht verschieben ?!
KyroxX - Sa 17.05.03 18:22
Titel: Fenster lässt sich bei "none" nicht verschieben ?!
Moin,
Hab folgendes Problem: Eine form die ich erstellt hab lässt sich nicht verschieben. Sie ist allerdings "none" also nicht "sizable".
Das hab ich hiermit gelöst:
bei mousedown:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
| procedure TForm2.Image1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
SendMessage(Form2.Handle, WM_SYSCOMMAND, $F012, 0);
end; |
Tso, des Image kommt, weil ich Form2 mit einer grossen grafik belegt hab.
Damit geht es !!! Wenn ich aber nun mit:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
| procedure TForm2.Timer1Timer(Sender: TObject);
begin
with Tmain.Create(Self) do
try
ShowModal;
finally
Free;
end;
if timer1.interval=10000 then
titel.close;
end; |
die Tmain form öffne, wo ich den gleichen code zu, verscheiben bei none verwende, gehts nicht !
Woran kann das liegen?
Anonymous - Sa 17.05.03 21:46
So wie ich das verstehe brauchst du das:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
| procedure TForm1.Image2MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if Button = mbLeft then
begin
ReleaseCapture;
Perform(WM_SYSCOMMAND,$F012, 0);
end;
end; |
Achja, bsNone klingt besser und versteht mal gleich ;)
Lange nicht mehr gesehen Kyroxx
KyroxX - Sa 17.05.03 22:41
Titel: hehe
rerö scrapt ;)
Hmm thx für die schnelle antwort *g*
Hab es abba anders gelöst ..
hab einfach die sache kommplet neugemacht .. hmm jetz gehts *löl*
Egal, bis denne
KyroxX
Anonymous - Sa 17.05.03 22:46
Wie denn? (Das wie denn hab ich mir von Luckie abgeguckt! Der Fragt das auch immer :lol: )
Warum bist du nur noch so selten in AIM und zockst so oft im Battlenet? Diablo wieda installiert?
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!