FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
como insertar en bd con estos componentes
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: Código:
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. |
#2
|
||||
|
||||
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 |
#3
|
|||
|
|||
Muchas gracias!!
Lo intentaré y ya te cuento. Saludos. |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Insertar componentes desde la API? | pai_delpher | API de Windows | 12 | 07-04-2008 20:45:14 |
Conocéis el nombre de estos componentes | José Luis Garcí | OOP | 8 | 12-02-2008 08:52:43 |
Como despliego estos datos en un grid?? | Gaim2205 | Varios | 2 | 03-12-2007 22:06:39 |
Insertar en un DbgridEh columnas con distintos componentes | mateamargo | OOP | 5 | 16-06-2005 21:35:03 |
Cual es la mejor alternativa entre estos dos componentes para concectar a MYSQL | ctronx | Conexión con bases de datos | 5 | 27-07-2004 16:42:33 |
|