Autor Beitrag
OmNiBrAiN
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Mo 12.05.03 21:30 
folgendes:

ausblenden Quelltext
1:
2:
3:
4:
5:
6:
for n:=0 to 5 do
begin
c := FindComponent('edit' + IntToStr(n+1));
if (Assigned(c)) and  (c is TCustomEdit) then begin
TCustomEdit(c).text :=IntToStr(Bytearray[n]*(n+1)); TCustomEdit(c).color :=clyellow; end;
[...]


das .text nimmt es anstandslos aber beim .color kommt obenstehende fehlermeldung...
warum? :?

Moderiert von user profile iconKlabautermann: Code-Tags hizugefügt.
maximus
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 896

Win XP, Suse 8.1
Delphi 4/7/8 alles prof
BeitragVerfasst: Mo 12.05.03 21:48 
liegt wohl daran, dass die color property in der Custom-klasse noch nicht freigegeben ist oder fehlt! Bei TEdit dürfte das kein prob mehr sein.

_________________
mfg.
mâximôv
OmNiBrAiN Threadstarter
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Mo 12.05.03 22:20 
ok es geht, danke :D