rozmiar komponentu po Maksymalizacji

0

Z pozoru łatwe pytanie, ale jakoś nastręcza mi kłopotów.

W Object Inspectorze nastawiłem, żeby forma uruchamiała się w wsMaximized; na formie mam np. TMemo z Align=alClient.
Tuż po uruchomieniu aplikacji potrzebuję znać rozmiar tego TMemo...

procedure TMainForm.FormCreate(Sender: TObject);
begin
        ShowMessage(IntToStr(Memo1.Width) );
end;

Ta procedura wyświetla rozmiary Memo przed Maxymalizacją?
Czy ktoś ma jakiś pomysł jak sprawdzić rozmiar Memo po maksymalizacji?

Nie chcę wstawiać na formę żadnych timerów i innego tego typu badziewia...

0

Jak wstawisz to do OnResize to będzie po maksymalizacji.
(nie jestem pewien, ale utworzenie formularza to niestety chyba też jest traktowane jako zmiana rozmiaru, więc dopiero drugie okno będzie miało prawidłową odpowiedź - liczę, że poradzisz sobie z tym (IsFirst: Boolean;))

0

OK. działa!
Trzeba było tylko w Object Inspectorze dać WindowState na wsNormal, a w OnCreate wrzycić WindowState:=wsMaximized; wtedy przy uruchamianiu zmieniał rozmiar okna... i tada...

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0