Witam,
Mam pytanie dotyczące aplikacji wielojęzykowej opartej na plikach INI.
Mam problem z zaczytaniem do pliku informacji Caption dla danego buttona. Procedura jest w osobnym unicie i wygląda tak:
for i:=0 to CheckForm.ComponentCount-1 do
begin
try
if (CheckForm.Components[i].ClassName = 'TButton')then
begin
try
cName:=CheckForm.Components[i].Name;
cCaption:=(CheckForm.Components[i] as TButton).Caption;
cHint:=(CheckForm.Components[i] as TButton).Hint;
INI.WriteString(CheckForm.Name+';caption',cName, cName);
INI.WriteString(CheckForm.Name+';hint',cName, cHint);
except
INI.WriteString(CheckForm.Name+';wyjatek',cName, 'wyjatek');
end;
end;
except
end;
... (i to samo dla innych komponentów).
niestety dla niektórych komponentow nie dziala (czytanie caption lub text) i w momencie
cCaption:=(CheckForm.Components[i] as TButton).Caption; wyskakuje do except.
Przy debugowaniu podaje informację, że (CheckForm.Components[i] as TButton).Caption = Expresion illegal in evaluator.
Czy ma ktos możr jakis pomysl?
Pozdrawiam, Ania
</ort>
</delphi>