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
  //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/

Reply via email to