Buscar un archivo

[[Caral]]

Hola
Bueno, aqui los resultados:
Ya coloque la base de datos, con la tabla Dias y los campos, Fecha, Comentarios, Estado.
Coloque el codigo que me diste, en Access no es igual la sintaxis, pero esencialmente similar, asi:
Recoger informacion:

Código Delphi [-]
procedure TFrCelda.pnl1Click(Sender: TObject);
begin
  Selected := not Selected;
  Form1.ADOQuery1.Close;
  Form1.ADOQuery1.Parameters.ParamByName('fecha').Value := Fecha;
  Form1.ADOQuery1.Open;
  if Form1.ADOQuery1.RecordCount  > 0 then
  begin
  mmo1.Lines.Add(Form1.ADOQuery1.Fields[1].AsString);
  end;
end;

Y Grabar la informacion:

Código Delphi [-]
procedure TFrCelda.Panel1Click(Sender: TObject);
begin
   with Form1.ADOTable1 do begin
     Open;
     Append;
     Form1.ADOTable1Fecha.Value := Fecha;
     Form1.ADOTable1Comentarios.Value := mmo1.Text;
     Form1.ADOTable1Estado.Value := '0';
     Post;
     Close;
  end;
  mmo1.Lines.Clear;
end;

Para grabar la informacion no hay problema lo hace perfectamente.
Para recoger la informacion, solo recoge el primer dato de la tabla y no respeta la fecha.
Fecha...........Comentarios.........Estado
05/07/2007......nada.................0
06/07/2007......otro..................0
Siempre muestra el primer dato, no importa en que dia se presione.
A que se debera esto, no lo entiendo.?
Saludos

[Neftali [Germán.Estévez]]

Ya veo que habéis seguido por el camino de la Base de Datos.
De todas formas, ya que el ejemplo estaba arriba, he subido un par de cambios (versión 2)
* Que se carguen todos los ficheros al crear o cambiar de mes
* Cambios para que los ficheros se creen en el directorio de applicación (carpeta) y no en C:\Dias (que era un poco molesto).

Seguramente si váis avanzando con la verión de BD también te pueden servir.

Un saludo.

[[Caral]]

Hola
Muy Util la modificacion ademas de practica, me alegro que le ayas metido mano, espero que Lepe no se enoje con nosotros por tocar su juguete, mas bien ojala le gusten los cambios.
La parte de la base de datos es interesante, por que da la oportunidad de incorporar el calendario a un proyecto, el problema es que todavia no camina, nos das un empujon?.
Saludos

[[egostar]]

Empezado por Caral

Para grabar la informacion no hay problema lo hace perfectamente.
Para recoger la informacion, solo recoge el primer dato de la tabla y no respeta la fecha.
Fecha...........Comentarios.........Estado
05/07/2007......nada.................0
06/07/2007......otro..................0
Siempre muestra el primer dato, no importa en que dia se presione.
A que se debera esto, no lo entiendo.?
Saludos

Ta raro Carlos, yo no tengo problema, si me muestra los datos correctamente

http://img54.imageshack.us/img54/2491/calendarioym1.png

Salud OS.

Edito: Lo que agregue en el evento donde muestras el comentario, es borrar el memo antes de mostrarlo, porque se duplica

Código Delphi [-]
mmo1.lines.clear;

[[Caral]]

Hola
Pues nada amigo, esto a mi no me camina y creo que no tiene que ver con access, veo que usas los componentes BDE, creo que la diferencia esta ahi, yo estoy usando ADO.
Podrias hacer una prueba con ADO?, a ver que pasa, no se si se pueden usar con paradox.
Saludos

[[egostar]]

Hola amigo, puedes colocar el programa en el ftp del club y tambien la base para hacer pruebas con lo mismo.

Salud OS

[[Caral]]

Hola
Aqui esta:
http://www.terawiki.clubdelphi.com/a...29%28BD%29.zip
A ver que podemos hacer, no se por que se me esta escapando de las manos.
Saludos

[[egostar]]

Se me hace que ya se donde esta el problema amigo Carlos, tu campo de fecha está asignado como TIMESTAMP solo el primero no tiene hora, por eso es que siempre toma el primero.

Cambia el campo por solo fecha y no FECHA-HORA

Salud OS.

Edito

Aquí como está la base.

[[Caral]]

Hola Amigo
En access no hay Fecha existe Fecha/hora y se le pone una entrada dependiendo de lo que se necesite en mi caso fecha corta osea 01/08/2007 asi se guardara en la tabla.
No crees que sea otra cosa?.
Vamos bájate OpenOffice y lo revisas.
Saludos