BorlandTalk.com

satish · Guest

hi ,
I have dynamically created components (edit boxes, comboboxes )on a
scrollbox, how i can find whether the text property of editboxes on a
scrollbos or empty or not ....intially i have written code ..like this

procedure TForm1.Button1Click(Sender: TObject);
var i : integer;
begin
with ScrollBox1.Components do
begin
for i :=0 to ScrollBox1.ComponentCount-1 do
begin
if (ScrollBox1.Components[i] is TEdit)then
begin
if checktextstatus(Edit1.Text) the
ShowMessage('text presnt');
else
ShowMessage('text not present');
end;
end;
end;
end;

how to call the edit boxes into the function?

i went wrong in writing the code for the function
checkstatus(st:string):boolean;

can anybody help me in doing this so ....or suggest me how to code the
above problem

thanking you,
satish