Den 30-01-05 15:16 skrev Jeppe følgende:
-----------------------------------------------------------------------------
nu ved jeg ikke lige men kan det være at
du skal have det her med bagved så det bliver:
Form1.ClientDataSet1.open;
Form1.ClientDataSet1.active := true;
?
Jeppe Johansen
Jeppesoftware@hotmail.com
-----------------------------------------------------------------------------
Det virker ikke, du kan lige få min åben adressebog også
procedure TForm1.benadressebog1Click(Sender: TObject);
begin
Form1.ClientDataSet1.Close;
if diaOpen.Execute then
begin
Form1.ClientDataSet1.FileName := diaOpen.FileName;
Form1.ClientDataSet1.Open;
Form1.StatusBar1.SimpleText := 'Der er ' + IntToStr(form1.ClientDataSet1.RecordCount) + ' personer i bogen';
end;
end;