Subject Re: [IBO] Looping thru queries in DM
Author Helen Borrie
At 10:13 AM 6/12/2004 +1100, you wrote:

>I remember seeing a neat little while loop structure somewhere in the IBO
>samples or tutorials (I thought) which opened all queries which existed in
>the datamodule.
>I can't find it or maybe it had nothing to do with IBO..

You might have seen it in the GSG (where there is also CPPB code for it).

In ObjectPascal:
var
ii: integer;
begin
..
with MyDatamodule do
begin
for ii := 0 to ComponentCount - 1 do
if Components[ii] is TIB_Query then
TIB_Query(Components[ii]).Open;
end;
..
end;

Helen