Tema
Boje
Pismo
Registracija

Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

Kako se dodaje

MultiColor LisBox, RichEdit ili nesto trece...

Odgovori Nova tema
Štampanje RSS teme Kopiraj vezu do teme Podeli na Facebook-u Podeli na X-u (Twitter) Idi na poslednju poruku
  • 3 odgovora
  • 2.983 pregleda

Najnovija ↓

MultiColor LisBox, RichEdit ili nesto trece... 27.05.2007. u 00:37 · pre 236 meseci #1
Pozdrav! Ja takodje radim seminarski, skoro sam pri kraju (a poceo sam juche :D), medjutim treba mi jedna stvar! Treba korisniku da prikazujem neki jednostavan log i recimo da u tom logu odredjene linije budu drugacije boje (npr. greske crvene, upozorenja plava ...). Da li neko zna gde mog naci neki prostu komponentu koja ima mogucnost MultiColor redova! Hvala unapred! ;)

P.S. Jel postoji nesto tako u JCL/JVCL paketu, poshto nisam uspeo da nadjem!
Re: MultiColor LisBox, RichEdit ili nesto trece... 27.05.2007. u 01:42 · pre 236 meseci #3
Listbox.

Podesiš mu style na lbOwnerDrawFixed.

A u OnDrawItem odradiš farbanje po svojoj želji.

Evo ti jednostavna primer koji farba tekst u svakoj trećoj liniji u zelenu, crvenu ili svetlo plavu.

Code:

procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
begin
  with Control as TListBox do
  begin
    Canvas.FillRect(Rect);
    case Index mod 3 of
      0: Canvas.Font.Color := clGreen;
      1: Canvas.Font.Color := clRed;
      2: Canvas.Font.Color := clSkyBlue;
    end;
    Canvas.TextOut(Rect.Left + 2, Rect.Top, Items[Index]);
  end;
end;


Ti naravno ne gledaš koja je linija po redu, nego kakav je tip poruke.

Easy?
Potpis
viking ®
Odgovori
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme