Mam taki kod (przeróbka jakiegoś źródła):
for i := ComponentCount -1 downto 0 do * wykonaj petla dla wszystkich komponentow...
begin
{ sprawdz, czy ich Tagi to 102 lub 103 }
if Components[i].Tag in [100, 110] then
begin
{ jezeli tak to zaladuj zasobo tekstowy odpowiadajcy ich tagom }
LoadString(DLL, Components[i].Tag, Buff, SizeOf(Buff));
Tmenuitem(Components[i]).Caption := Buff; * nastepnie przypisz tekst do komponentu
end;
end;
I teraz dlaczego mi nie zmienia caption? Nawet jak dam jakiś stały tekst, więc nie jest to związane ze zmienną buff. Przypuszczam, że chodzi tu o odwołanie:
Tmenuitem(Components[i]).Caption := Buff;
Co jest nie tak? :| ---------------------------
Delphi 6
Pozdrówka