----- Original Message -----
From: <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Tuesday, October 02, 2001 3:40 PM
Subject: [DUG]: first error fixed, now for the second
ok i managed to fix the first error i must have had a ctrl character
in there but the rest i get record, object required. the function and
the procedure are listed
procedure TForm1.BitBtn7Click(Sender: TObject);
var
SearchText : string;
tmp : address;
begin
SearchText:=InputBox('Name Search','Enter The Name Your Looking
For','');
if (SearchText <> '') and Find( SearchText ) then
begin
//error eread( AddressFile, tmp );
//error eName.text := tmp.Name;
//error eStreetAddress.text := tmp.StreetAddress;
//error ecity.text:=tmp.city;
//error ephone.text:=tmp.phone;
//error emobile.text:=tmp.mobile;
/ /error eemail.text:=tmp.email;
end;
end;
...
Brendon,
In your first post about this problem, you said you had a form with a
number of edit controls on it. What are their names? When I wrote the
BtnClick procedure, I assumed that the edit control to display the name was
called eName, the one for street address was called eStreetAddress and so
on.....
If the names of the controls are Edit1, Edit2 and so on, then just change
the procedure to assign the values correctly eg:
Edit1.text := tmp.Name;
Edit2.,text := tmp.StreetAddress
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
