Hola kurono, ¿Esta pregunta viene a por lo que nos comentabas el otro
día?
Si es asi, lo correcto hubiera sido seguir en dicho hilo y no abrir otro.
Yo el otro día te había pedido amablemente, y luego lo hizo en el mismo modo BlueSteel que nos relataras mejor tu caso. ¿Lo hiciste? No.
Y ahora otra vez, a preguntas breves, respuestas breves y pobres.
¿con que componentes? Supongo que la tabla es Access o SQLServer, como nos decías el otro día... podría ser ADO los componentes... pero no necesariamente... Es por ello que cuando uno pide ayuda debe aportar la mayor cantidad posible de datos. Sino estaremos adivinando.
¿Con que lo hacemos? ¿Con un Table? ¿Con un Query, y por tanto a través de SQL?
Con Tables, sería algo así:
Código Delphi
[-] ADOTable1.Edit;
ADOTable2.Edit;
ADOTable1.FieldByName('Campo1').Value := un_valor;
ADOTable1.FieldByName('CampoN').Value := un_valorN;
ADOTable2.FieldByName('Campo1').Value := un_valor;
ADOTable2.FieldByName('CampoN').Value := un_valorN;
ADOTable1.Post;
ADOTable2.Post;
Con TQuerys, y por tanto SQL sería así:
Código Delphi
[-]
ADOQuery1.Close;
ADOQuery1.SQL.Text := 'insert into tabla1 (tus_campos) values (tus_valores)';
ADOQuery1.ExecSQL;
Y el proceso análogo con tabla2.
LO que te comenté es a manera simple, y creo que deberías mostrar un poco más de interés en explicar tu problema para que podamos ayudarte de la mejor manera. No lo hiciste con el hilo anterior, y ahora con éste.
Si empleas el
buscador y realizas búsquedas sobre TQuerys, TTables, SQL y demás encontrarías muchos ejemplos. Muchísimos hilos han sido tratado sobre estos temas.
Por favor Kurono se más expresivo con respecto a tus dudas.
Si te estás recién metiendo en el tema de base de datos, y delphi sugiero que leas La Cara Oculta de Delphi 4 (pdf), disponible en la sección
FTP del club.
Saludos,