mam taki problem, chcialbym zmienic standardowe kolory (te z windowsa) w mojej aplikacji ale tak zeby nie naruszac ich w systemie. Dokladniej, chcialbym zmienic kolory typu clbtnface, clbackground ... na moje, tak aby zmiana byla widoczna tylko w obrębie mojego programu. Nie wiem czy cos takiego jest mozliwe, ale jesli ktos wie jak to prosze o pomoc, najlepiej przyklad bo moge sobie nie poradzic z tym :(
Chyba ze znacie inny sposób (oprócz malowania po komponencie) na zmiane kolorow na przyklad suwaków w listbox.
Z góry dzieki za odpowiedzi
0
0
Tu masz przykład jak zmienić kolor tła w komponencie Edit. Zmienia na kolor żółty.
procedure TForm1.Button1Click(Sender: TObject);
var
i :Integer;
begin
for i :=0 to ComponentCount -1 do
if Components[i] is TEdit then
TEdit(Components[i]).Color :=clYellow;
end;
Poprzerabiaj to na swoje potrzeby.
0
nie o to mu chodzilo.
to zmieni Ci tylko kolor wnetrza TEdita.
TEdit ma jeszcze ramke i chodzi tez o zmiane koloru tej ramki...