![]() |
![]() |
| Paypal | 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
|
||||
|
||||
|
Mmm...
Gracias por responder Marcos.
En OnNewRecord del TTable (En el inspector) no tengo nada. Donde utilizo Insert es acá. Lo cual me da para pensar el código, porque lo único que cambio es el 'Stock' en la base de datos cuando realizo la venta. Código:
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Table1.Insert; //Abrimos la tabla.
Form1.Table1.FieldByName('Codigo').AsString:=Edit1.Text;
Form1.Table1.FieldByName('Costo').AsString:=DBEdit4.Text;
Form1.Table1.FieldByName('Stock').AsString:=Edit1.Text;
Form1.Table1.Post; //Guardamos los cambios.
end;
Código:
AssignFile(Archivo,'Ruta\*.csv'); //Este es el archivo separado por comas.
if not(FileExists('Ruta\*.csv')) then ReWrite(Archivo)
else Append(Archivo);
(Es más bien un deseo más que una afirmación!) ![]() Lo que si descarté es que sea en el código dentro del Button, ya que solo inserta las líneas en blanco cuando corro el programa. Si lo abro y lo cierro sin hacer ninguna operación de todos modos me inserta la línea en blanco. Alguna idea? Gracias por el tiempo y la atención.
__________________
"Cada minuto que pasa es una oportunidad más para cambiarlo todo." |
|
#2
|
||||
|
||||
|
Veo que añades un registro al crear el formulario infiero que en ese momento el Edit, aún no contiene nada, ese código trasládalo al botón para dar altas y creo que resolverás el problema.
Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
|
#3
|
||||
|
||||
|
Resuelto
El tema es así, toooodo esto era innecesario.
Código:
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Table1.Insert; //Abrimos la tabla.
Form1.Table1.FieldByName('Codigo').AsString:=Edit1.Text;
Form1.Table1.FieldByName('Costo').AsString:=DBEdit4.Text;
Form1.Table1.FieldByName('Stock').AsString:=Edit1.Text;
Form1.Table1.Post; //Guardamos los cambios.
end;
Creo que te referís a eso en lo que respondiste esta última vez, lástima no haber leído la respuesta antes. Al final era una tontera nomás. Soy nuevo en esto, voy aprendiendo con los manuales, la práctica y la experiencia de mi partener. Muchísimas gracias por el tiempo y la atención dispensada. Saludos. PD: Prometo estar más atento la próxima! ![]() PD2: Y eso que preparé jarras y jarras de café para estar bien despierto! Creo que lo preparé con el descafeinado... por eso tengo tanto sueño... ![]()
__________________
"Cada minuto que pasa es una oportunidad más para cambiarlo todo." |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| Eliminar Espacios en Blanco | eudy.net | Conexión con bases de datos | 18 | 09-06-2008 18:00:47 |
| SQL y los espacios en blanco | fide | SQL | 5 | 11-02-2008 23:44:34 |
| Problemas con Espacios en blanco | jfontane | PHP | 7 | 08-02-2008 15:59:25 |
| SPLIT en delphi, pero sin tener en cuenta espacios en blanco | acl_gandalf | Varios | 1 | 08-04-2005 14:24:56 |
| Porque me deja en blanco el DBGrid? | judoboy | Conexión con bases de datos | 1 | 03-07-2003 10:00:56 |
|