Forum: Sonstige Fragen zu Delphi
Delphi
by Redeemer,
6. Jan 2015
Du musst das nach dem bestehenden CopyRect in deinen Quelltext einfügen (und den TPoint deklarieren natürlich). Wenn einfach nur das Bild der ersten Form fehlt, scheint das ja nicht ganz falsch zu sein so weit.
Forum: Sonstige Fragen zu Delphi
Delphi
by Redeemer,
6. Jan 2015
Ohne Fensterrahmen des Unterfensters kann man das ganz einfach mit Copyrect machen.
Temp := Point(Subform.Left + (SubForm.Width - SubForm.ClientWidth) div 2, Subform.Top + SubForm.Height - SubForm.ClientHeight - (SubForm.Width - SubForm.ClientWidth) div 2); // angenommen, das Fenster hat unten so viel Rahmen wie links und rechts
Bitmap.CopyRect(Rect(Temp.X, Temp.Y, Temp.X +...