Opdater farver i listbox!

Tags:    delphi

Jeg har en listbox som er hvid med sort tekst!!

hvis jeg bruger følgende kode på en button så bliver det ikke så pænt!!!

listbox1.color := clblue;
listbox1.font.color := cdred;

Jeg bliver nød til at minimer mit program før alle farver bliver opdateret!!!
ellers skal jeg select alle items i min listbox!!
har prøvet med listbox.update; men ved ikke om det det er forkert?!?! hvordan kan jeg få den til at opdater uden at minimer programet?





8 svar postet i denne tråd vises herunder
3 indlæg har modtaget i alt 3 karma
Sorter efter stemmer Sorter efter dato
Jeg har en listbox som er hvid med sort tekst!!

hvis jeg bruger følgende kode på en button så bliver det ikke så pænt!!!

listbox1.color := clblue;
listbox1.font.color := cdred;

Jeg bliver nød til at minimer mit program før alle farver bliver opdateret!!!
ellers skal jeg select alle items i min listbox!!
har prøvet med listbox.update; men ved ikke om det det er forkert?!?! hvordan kan jeg få den til at opdater uden at minimer programet?



listbox.redraw;

Casper



og hvad er FormPaint(Nil); ???

procedure TForm1.Button1Click(Sender: TObject);
begin
listbox1.color := clblue;
listbox1.font.color := clred;
FormPaint(Nil);??
end;

lidt mere oplysning


gør sådan her:

procedure TForm1.Button1Click(Sender: TObject);
begin
listbox1.color := clblue;
listbox1.font.color := clred;
Paint;
end;

det gør at efter du har skiftet farverne så tegnes formen igen sammen med dets childs i den nye farve

Jeppe Johansen
Jeppesoftware@hotmail.com



Jeg har en listbox som er hvid med sort tekst!!

hvis jeg bruger følgende kode på en button så bliver det ikke så pænt!!!

listbox1.color := clblue;
listbox1.font.color := cdred;

Jeg bliver nød til at minimer mit program før alle farver bliver opdateret!!!
ellers skal jeg select alle items i min listbox!!
har prøvet med listbox.update; men ved ikke om det det er forkert?!?! hvordan kan jeg få den til at opdater uden at minimer programet?



Prøv:
Fold kodeboks ind/udKode 


MH.

The-Freak

Livet er for kort til at kede sig.



hvad er listbox.redraw; ??? den kan jeg ikke finde.



Jeg har en listbox som er hvid med sort tekst!!

hvis jeg bruger følgende kode på en button så bliver det ikke så pænt!!!

listbox1.color := clblue;
listbox1.font.color := cdred;

Jeg bliver nød til at minimer mit program før alle farver bliver opdateret!!!
ellers skal jeg select alle items i min listbox!!
har prøvet med listbox.update; men ved ikke om det det er forkert?!?! hvordan kan jeg få den til at opdater uden at minimer programet?



FormPaint(Nil); burde kunne klare det...

MH.

The-Freak

Livet er for kort til at kede sig.



og hvad er FormPaint(Nil); ???

procedure TForm1.Button1Click(Sender: TObject);
begin
listbox1.color := clblue;
listbox1.font.color := clred;
//FormPaint(Nil);??
end;

lidt mere oplysning



og hvad er FormPaint(Nil); ???

procedure TForm1.Button1Click(Sender: TObject);
begin
listbox1.color := clblue;
listbox1.font.color := clred;
FormPaint(Nil);??
end;

lidt mere oplysning

gør sådan her:

procedure TForm1.Button1Click(Sender: TObject);
begin
listbox1.color := clblue;
listbox1.font.color := clred;
Paint;
end;

det gør at efter du har skiftet farverne så tegnes formen igen sammen med dets childs i den nye farve

Jeppe Johansen
Jeppesoftware@hotmail.com

det virker ikke! den farver kun teksten, og bagrund bag teksten. Den farver ikke hele linien!!



det virker heller ikke!! farverne kommer, men det ser helt forkert ud!!! har i prøvet det??



t