Üdv!
Adott egy app és néhány formon van SQLQuery komponens. Ezeknek néhány (float) mezője be van állítva, pl. DisplayFormat:='#0.0000'
Be lehet járni valahogy ezeket a komponenseket és beállítani a DisplayFormat értéket?
Tehát ilyesmire gondoltam:
procedure TmainForm.FormCreate();
begin
for i:=0 to Component.Count...
if (Components[i] as TSQLQuery ) then (Components[i] as TSQLQuery).DisplayFormat:='#0.00';
...
Be szeretném járni az SQLQuery komponenseket az alkalmazásban futáskor.
Hasonlóan, mint Form-ok bejárása:
for i:=0 to Screen.FormCount-1 do
if ( Screen.Forms[i].Visible ) and ( Screen.Forms[i].Name <> 'mainForm' ) then
// do something
