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.