Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
3. Apr 2024
Oder ein kleines TPanel (BevelOuter=bvNone), TPaintBox, TShape (Brush.Style=bsClear und Pen.Style=psClear) oder oder oder
Image und PaintBox haben den Vorteil, dass man sie im Designer sieht. Oder die Anderen erst zur Laufzeit im Constructor bzw. OnCreate unsichtbar machen.
Wobei PaintBox von den Beiden das Ressourcenschonenstere ist, da eh kein Bild gemalt werden wird.
Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
3. Apr 2024
Irgendwo hinklicken und so tun, als wäre da ein Button,
oder irgendwo hinklicken und ein Button wird sichtbar, welcher sich danach anklicken lässt?
// das Erste (wurde in Bereich geklickt)
procedure TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if Rect(8, 8, 50, 50).Contains(Point(X, Y)) then
machwas;
end;