H,
Danke zunächst.
Vorweg zum nachfolgenden Code:
Es ist der allerletzte Schluß einer aus der Mainform aufgerufenen Procedur ( nach nem Click in einer ListView). Da sich die größen ständig ändern hab ich eine Routine gebastelt, die die absoluten Größen aller
MDi's steuert und durhläuft, neue Positionen (Top) setzt und nach den Vorgaben ausrichtet.
var i ist weder belastet noch belegt, Rückgabe okay.
...
Delphi-Quellcode:
i := 0;
if (Mainform.FindComponent(Bearbeitungs_Frame) as TMDIChild) <> nil then
with (Mainform.FindComponent(Bearbeitungs_Frame) as TMDIChild) do begin
i := top;
end;
if Assigned(Application.MainForm) and IsWindow(Application.MainForm.ClientHandle) then
SendMessage(Mainform.ClientHandle, WM_VSCROLL, SB_THUMBPOSITION, i);
Focus hatte die ListView
Laß ich mir (i) als showmessage ausgeben, dann passiert kein Laufzeit-Fehler, aber es passiert auch nichts mit dem 'Top' des
MDI. Werd mich nochmal reinhängen, aber ich fürchte, es ist delphiinteres Wunderzeugs...
Muss wohl auf Frames umsteigen...
Gruß
Danke