borgo
asked on
300 points for this question
Hi Expert
I'm looking for a shareware or freeware program with which I can edit some old db4 tables.
Can you help me please ?
Thank you.
Andrea.
I'm looking for a shareware or freeware program with which I can edit some old db4 tables.
Can you help me please ?
Thank you.
Andrea.
? what about the database-desktop
If you mean DBASE 4 you can use Database Desktop which comes with Delphi
Motaz
Motaz
Ummm... maybe just me, but if you say this question's worth 300 points, why don't you make it 300 points?
(I'm getting a little paranoid here, cuz there are always people trying to cheat out of paying points).
(I'm getting a little paranoid here, cuz there are always people trying to cheat out of paying points).
? or just make a simple application
(a tdbgrid, a tdbnavigator, a ttable, a tdatasource, a topenfiledialog (for selecting the table), ~ten lines code, ready)
(a tdbgrid, a tdbnavigator, a ttable, a tdatasource, a topenfiledialog (for selecting the table), ~ten lines code, ready)
hi again,
here it is
unit db_simple_edit_u;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Db, DBTables, Grids, DBGrids, DBCtrls, StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
Panel1: TPanel;
Button1: TButton;
DBNavigator1: TDBNavigator;
DBGrid1: TDBGrid;
Table1: TTable;
DataSource1: TDataSource;
OpenDialog1: TOpenDialog;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender : TObject);
begin
if opendialog1.execute then
begin
Table1.Close;
Table1.DatabaseName := ExtractFileDir(opendialog1 .Filename) ;
Table1.TableName := ExtractFileName(opendialog 1.Filename );
try
table1.Open;
Panel1.Caption := 'File : '+opendialog1.Filename;
except
raise;
end;
end;
end;
end.
requirements, bde installed, no alias must be defined,
works on dbase and paradox files
meikl
here it is
unit db_simple_edit_u;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Db, DBTables, Grids, DBGrids, DBCtrls, StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
Panel1: TPanel;
Button1: TButton;
DBNavigator1: TDBNavigator;
DBGrid1: TDBGrid;
Table1: TTable;
DataSource1: TDataSource;
OpenDialog1: TOpenDialog;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender
begin
if opendialog1.execute then
begin
Table1.Close;
Table1.DatabaseName := ExtractFileDir(opendialog1
Table1.TableName := ExtractFileName(opendialog
try
table1.Open;
Panel1.Caption := 'File : '+opendialog1.Filename;
except
raise;
end;
end;
end;
end.
requirements, bde installed, no alias must be defined,
works on dbase and paradox files
meikl
Exel 97 will do the job
but it can only a word of reccords
but it can only a word of reccords
Hey borgo, all of us provide a good solution I think, so that you have to divide this point between all the people here :-)
ASKER
Hi to all of you and thanks for the answers.
I'm not trying to cheat you nrico.
I have posted that question in more areas inside EE so I could give the points only after I get a good answer.
I'd like to know if with your solutions I can save every changes I meade into the table in the same format (DBASE4)
Thank you
I'm not trying to cheat you nrico.
I have posted that question in more areas inside EE so I could give the points only after I get a good answer.
I'd like to know if with your solutions I can save every changes I meade into the table in the same format (DBASE4)
Thank you
hi borgo,
you should be more specific.
the change of an fieldvalue will not result in a restructure.
meikl
you should be more specific.
the change of an fieldvalue will not result in a restructure.
meikl
Borgo
Sure you will stay with the same format if you use Database Desktop.
Motaz
Sure you will stay with the same format if you use Database Desktop.
Motaz
ASKER
Does Database Desktop need BDE ?
Sure
ASKER
Ok thanks to all of you now I have a good knowledge about the problem.
So I'll share the point between you:
- kretzschmar
- Motaz
- Nico
Regards and see you in EE.
Andrea.
So I'll share the point between you:
- kretzschmar
- Motaz
- Nico
Regards and see you in EE.
Andrea.
ASKER
Please kretzschmar answer to this question to get the points.
Nico and Motaz will find another question, inside the Delphi area, with 100 points.
Is all right ? :-)
Bye
Nico and Motaz will find another question, inside the Delphi area, with 100 points.
Is all right ? :-)
Bye
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Adjusted points from 1 to 100
ASKER
:-)
ASKER
See you and thank you.
Please look also to a new question of mien at:
http://www1.experts-exchange.com/questions/10332639/Disable-the-proxy-server-in-IE.html
bye
Please look also to a new question of mien at:
http://www1.experts-exchange.com/questions/10332639/Disable-the-proxy-server-in-IE.html
bye
(I'm getting a little paranoid here, cuz there are always people trying to cheat out of paying points).