Inny wyglad memo, buttona itp

0

Witam, Delphi dopiero zaczynam sie uczyc :d i niewiem jak zrobic aby moje memo, miejsce na tekst, button mialy inny wyglad. Inny kolor, zaokraglone rogi. Da sie to zrobic?: )

0

Tak.
Jak ?
O tak:
Rozdział 15

0

Możesz ukryć suwak memo i skorzystać z kodu ze strony:
http://www.softsale.com.pl/porady/r030.htm

procedure TForm1.MemoScrollDown(Memo: TMemo);
var
ScrollMessage:TWMVScroll;
i:integer;
begin
ScrollMessage.Msg:=WM_VScroll;
for i := 0 to Memo.Lines.Count do
begin
ScrollMessage.ScrollCode:=sb_LineDown;
ScrollMessage.Pos:=0;
Memo.Dispatch(ScrollMessage);
end;
end;

 

Wywołanie: MemoScrollDown(Memo1); lub MemoScrollUp(Memo1);

a zamiast normalnego buttona wstawić SpeedButton1 i tam wstawić obrazki jako scrole.

Poszukaj w necie komponenty: skin delphi

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