Witam. Mam takie pytanie. W jaki sposób można zrobić tak, aby obrazek w TImage wychodził troche poza okienko formy. Chodzi mi o uzyskanie takiego efektu jak tutaj:
Pozdrawiam
Witam. Mam takie pytanie. W jaki sposób można zrobić tak, aby obrazek w TImage wychodził troche poza okienko formy. Chodzi mi o uzyskanie takiego efektu jak tutaj:
Pozdrawiam
Obrazek nie wystaje z formy. Po prostu odpowiednia część formy jest przezroczysta
Przezroczysta forma
Nieregularna forma
Tak naprawdę TImage nie wystaje poza formę, tylko w tych miejscach jest transparenty.
Możesz to zrobić tak:
Przygotowujesz sobie bmp która będzie twoim oknem programu. W miejscach gdzie ma być niewidoczna dajesz jakiś <ort>żadki </ort>kolor (taki żeby nie występował w widocznej części) np. clFuchsia.
Do TImage wrzucasz bmp i ustawiasz wymiary formy na takie jak wymiary obrazka.
We właściwościach formy ustawiasz BorderStyle na bsNone, TransparentColorValue na ten który ma być niewidoczny (czyli np. wspomniana już clFuchsia) no i TransparentColor na True.
możesz jeszcze w onMouseMove TImage dać to
if ssLeft in Shift then
begin
ReleaseCapture;
SendMessage(Form1.Handle, WM_NCLBUTTONDOWN, HTCAPTION, 0);
end;
Dzieki temu będziesz mogl przesuwac oknem tak jak chwytajac za belkę
Zarejestruj się i dołącz do największej społeczności programistów w Polsce.
Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.