this is quite different from the original problem where
the problem lines looked like:
//error here// SearchText := inputbox( 'Name Search', 'Enter the name
you''re looking
for', '' );
you've changed several things and still have the problem -
that's new information
-ns
----- Original Message -----
From: <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Tuesday, October 02, 2001 8:53 AM
Subject: Re: [DUG]: help with search string
On Tue, 2 Oct 2001 13:41:24 +1200, you wrote:
>Can you post the original problem again?
>
>Thanks
>
>Stacey
>
ok Stacey below os the code i am getting the error unterminated string
in the line which i will mark for you the error is at compile time and
is starting to really piss me off.
procedure TForm1.BitBtn7Click(Sender: TObject);
var
SearchText : string;
tmp : address;
begin
file://error on this line// SearchText := inputbox( 'Name Search', 'Enter
the name your looking
for');
if (SearchText <> '') and Find( SearchText ) then
begin
read( AddressFile, tmp );
eName.text := tmp.Name;
eStreetAddress.text := tmp.StreetAddress;
ecity.text:=tmp.city;
ephone.text:=tmp.phone;
emobile.text:=tmp.mobile;
eemail.text:=tmp.email;
end;
end;
...
Brendon Toogood
E-Mail [EMAIL PROTECTED]
---------------------------------------------------------------------------
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/
---------------------------------------------------------------------------
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/
