the data is unsorted and the file is opened when the program is ran.
so i type in your function and then call it by find in the
bitbutton1.click procedure?
...
Brendon Toogood
Pretty much yeah.
eg:
TMyForm.BitButton1.click( sender : TObject )
var
SearchText : string;
tmp : address;
begin
SearchText := InputBox( 'Name Search', 'Enter the name you''re looking
for', '' );
if (SearchText <> '') and Find( SearchText ) then
begin
read( AddressFile, tmp );
eName.text := tmp.Name;
eStreetAddress.text := tmp.StreetAddress;
..... and so on
end;
end;
---------------------------------------------------------------------------
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/
