Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 14-12-2008
Avatar de TURBOIGOR
TURBOIGOR TURBOIGOR is offline
Miembro
 
Registrado: nov 2008
Posts: 29
Poder: 0
TURBOIGOR Va por buen camino
como volver a traer datos de un stringgrid?

hola les cuento mi problema

estoy utilizando un stringgird para hacer una asignacion d turnos...en la primer columna tengo los horarios cada media hr y en la primer fila el nombre del personal a cargo. Tambien hay un datetimpecker para cambiar de fecha.
Con el evento onselectcell del stringgrid se abre una pantalla para ingresar un nuevo turno (nombre del cliente y servicio a prestar por ej: Gustavo/corte de pelo). Lo que quiero saber es como hacer para dejar guardados esos turnos en la posicion donde los cargue...ya que cuando cambio de dia y vuelvo al dia donde estaban los turnos ingresados no estan mas.
Desde ya muchas gracias
Responder Con Cita
  #2  
Antiguo 14-12-2008
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Vi la pegunta, pero no se exactamente lo que podria hacer.
No entiendo muy bien, guardar los datos, guardarlos en donde?
Me podrias decir como cargas los datos?. y donde quieres guardarlos?
Si es en una base de datos, dime con que trabajas.
Saludos
__________________
Siempre Novato
Responder Con Cita
  #3  
Antiguo 14-12-2008
Avatar de TURBOIGOR
TURBOIGOR TURBOIGOR is offline
Miembro
 
Registrado: nov 2008
Posts: 29
Poder: 0
TURBOIGOR Va por buen camino
tengo una base de datos en access y dentro una tabla q se llama turnos.

cuando hago onSelectCell se abre otro form para ingresar el nombre del cliente q se va a atender y el servicio a realizar y asi se guarda:

turnos.StringGrid1.Cells[cell_col,cell_row]:=edit3.Text+'/'+edit6.text;
turnos.ADOTable1.open;
turnos.ADOTable1.insert;
turnos.ADOTable1.FieldByName('Fecha_turno').value:=turnos.DateTimePicker1.Date;
turnos.ADOTable1.FieldByName('Hora_turno').Value:=turnos.stringgrid1.cells[0,cell_row];
turnos.ADOTable1.FieldByName('Codigo_Cliente').Value:=edit1.text;
turnos.ADOTable1.FieldByName('Apellido').Value:=edit2.text;
turnos.ADOTable1.FieldByName('Nombre').Value:=edit3.text;
turnos.ADOTable1.FieldByName('Legajo').Value:=edit4.text;
turnos.ADOTable1.FieldByName('Nombre_emp').Value:=edit5.text;
turnos.ADOTable1.FieldByName('Servicio').Value:=edit6.text;
turnos.ADOTable1.post;
turnos.ADOTable1.close;
nuevo_turno.Close;

cuando cambio la fecha pongo q m blankee el stringgrid

procedure TTurnos.DateTimePicker1Change(Sender: TObject);
var x,y:integer;
begin
for x:= 1 to stringgrid1.ColCount-1 do
for y:= 1 to stringgrid1.RowCount-1 do
stringgrid1.Cells[x,y]:='';
end;

si kiero ir a una fecha mas adelante y desp volver atras ningun turno keda guardado en el stringgrid...
m conviene en la base de datos hacer 2 campos con la posicion d la fila y de la columna en dond estoy guardando los datos y traelos a traves d una consulta?
Responder Con Cita
  #4  
Antiguo 14-12-2008
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Veo que solo guardas (Hora_turno) del stringrid.
Tambien veo que usas un adotable.
Veo que al fina de la inserción cierras la tabla, (donde la abres otra vez?).
Cuando cargas los datos al stringrid?, como?
El programa me parece que por el momento es pequeño, me gustaria verlo con la base de datos.
Puedes hacer un Zip e ir a avanzado y adjuntar el archivo, asi lo veria mejor.
Saludos
__________________
Siempre Novato
Responder Con Cita
  #5  
Antiguo 14-12-2008
Avatar de TURBOIGOR
TURBOIGOR TURBOIGOR is offline
Miembro
 
Registrado: nov 2008
Posts: 29
Poder: 0
TURBOIGOR Va por buen camino
el programa zipeado pesa 550 kb como hago para subirlo?
Responder Con Cita
  #6  
Antiguo 14-12-2008
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
1-Sube la base de datos aparte.
2-En el zip no pongas el exe del programa, quitalo.
Saludos
__________________
Siempre Novato
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Traer datos de una tabla y ordenarlos en un dbgrid ordenados Petolansa Varios 3 07-12-2007 15:40:03
Traer datos de un dbgrid Petolansa Varios 3 19-10-2007 17:54:18
Traer datos desde otra bd con un SP Walterdf Firebird e Interbase 3 15-08-2007 18:47:30
Insertar y traer datos de una tabla en .NET Alexander .NET 0 26-08-2005 19:54:02
Traer los datos de una tabla a un dbcombo andresenlared Conexión con bases de datos 1 29-12-2003 17:18:04


La franja horaria es GMT +2. Ahora son las 23:44:10.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi