como insertar en bd con estos componentes

[carmelina]

Hola a todos!!!

Mi problema es que necesito ir introduciendo datos en una tabla de una bd mySQL una vez que se esta ejecutando mi programa. Los componentes que utilizo para conectar delphi 5 y la bd y ver lo que hay dentro son ADOTable, DBGrid, DBNavigator y DataSource.


El codigo que estoy usando es:

 
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Db, ADODB, Grids, DBGrids, Buttons, StdCtrls, DBCtrls, ExtCtrls;
type
  TForm1 = class(TForm)
    Panel1: TPanel;
    DBNavigator1: TDBNavigator;
    Control: TButton;
    Cerrar: TBitBtn;
    DBGrid1: TDBGrid;
    Tabla: TADOTable;
    DataSource1: TDataSource;
    Video: TButton;
    procedure ControlClick(Sender: TObject);
    procedure CerrarClick(Sender: TObject);
    procedure VideoClick(Sender: TObject);
  private
    { Private declarations }
    cont : integer;
    nombrevideo : String;

  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
uses Unit2;
{$R *.DFM}
procedure InsertarEnTabla(nombrevideo : String; Tabla : TADOTable);
begin
 
//Esto es lo que me haría falta saber, como introducir aqui los campos de 
// mi tabla (fecha, nombre del video, ruta)
 
end;
procedure TForm1.ControlClick(Sender: TObject);
begin
If Control.Caption='Abrir' then
  begin
  Control.Caption:='Cerrar';
  Tabla.open;
  if cont=1 then
    nombrevideo:=form2.SaveDialog1.FileName;
   //Aqui empieza mi problema
    InsertarEnTabla(nombrevideo,Tabla);
  end
Else
  begin
  Control.Caption:='Abrir';
  Tabla.Close;
end;
end;
procedure TForm1.CerrarClick(Sender: TObject);
begin
Tabla.Close;
Halt(0);
end;
procedure TForm1.VideoClick(Sender: TObject);
begin
form2.show;
cont:= 1;
end;

end.

Si podeis ayudarme estaría muy agradecida porque la verdad es que estoy bastante verde en esto de las bases de datos.

Muchas gracias.

[[Caral]]

Hola
AdoConnection (conecta con la base de datos)
AdoTable (conecta con el adoconnection y con la tabla que quieres accesar)
DataSource (conecta con el adotable)
DBnavigator (conecta con el datasource)
DBGrig (conecta con el datasource)
con estos pasos lo podras hacer.
Recuerda que tienes que activar el adoconnection y el adotable.
Adoconnection. conected:= true;
Adotable open;
eso es todo.
Saludos

[carmelina]

Muchas gracias!!
Lo intentaré y ya te cuento.

Saludos.