Jak zrobić efekt lupy formy?

0

Chodzi mi o to żeby po kliknięciu zdjęcia lupy forma z wszystkimi komponętami zwiększała lub zmniejszała swój rozmiar.

0

moze w zdarzeniu onClick wpisz
Form1.Width := Form1.Width + ilestam
Form1.Height := Form1.Height + ilestam

0

Spróbuj pokombinować ze scaleby().

0

W pakiecie JEDI jest stosowny komponent
wystaczy wybrac powiekszenie i dac true i juz wyswietla efekt lupy na pochodnym TImage

0
  1. Chciałbym skalować wszystkie komponęty. Zwiększając wysokość i szerokość komponętu np: Labela nie uzyskam takiego efektu.

  2. W jaki sposób za pomocą instrukcji scaleby można przeskalować jakiś komponent np: label-a.

  3. Nie chodzi mi o powiększanie obrazka tylko o skalowanie wszystkich komponentów znajdujących się na formie.

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