mostrar la hora y fecha actual del sistema

[TOPX]

Hola,

Label1->Caption = FormatDateTime("dd/mm/yyyy hh:nn:ss", Now());

Y si quiere que se 'actualice' cada cierto tiempo, pone ese código en el evento OnTimer de un TTimer (pestaña System).

[zidfrid]

hola en tu otro hilo puse una opcion que te puede servir.
saludos y suerte.

[M@R!N@]

Hola! Bueno, veo que muchos ya han posteado una muy buena respuesta, pero permíteme ayudarte también.

De hecho en el hilo anterior, la opción que te dió sisgeorge es buena, solo que para jalar la hora o fecha actual del sistema... debes poner esto:

Now().CurrentDate(); //Para la fecha actual, ejemplo: 31/07/2008 <--Formato con el que aparece.

Now().CurrentTime(); //Para la hora actual, ejemplo: 15:59:10

Now().CurrentDateTime(); //Para hora y fecha: 31/07/2008 15:59:10

Ahora, para lo que quieres hacer con un Label, en el evento OnCreate de tu forma solo tienes que poner:

Label->Caption=Now().CurrentDate();

Y te mostrará la fecha actual del sistema, lo puedes comprobar cambiando la fecha del sistema y corriendo de nuevo el programa, así verás que la fecha de tu label siempre va a ser la que tenga el sistema.

Para la hora, pues de igual manera como te dicen los demás, coloca un Timer en tu forma, que su propiedad Interval sea igual a 1000 y dentro de su evento OnTimer colocas:

Label2->Caption=Now().CurrentTime();

Espero que te sirva, pruébalo y nos dices si te funciona, suerte!

[airam]

hola amigos, si ya me di cuenta del error que tenia, de hecho todas las ayudan iban a lo mismo, solo q pues comprenderan aun no doy bien con esto, ya me salio la fecha y la hora, es la misma logica en builder, gracias a todos por su gran ayuda, mil gracias.

Bueno aprovechando esto, otra duda que tengo, como puedo pintar una fila del DBgrid en builder, por ejemplo tengo mi dbgrid conectada a un datasourse, y mi tabla es sobre peliculas, recorro la tabla y comparo que peliculas son del mismo genero, y quiero pintar todas las lineas de un color que su genero sean iguales, aun no se como y agradeceria mucho la ayuda, y pues gracias por su comprension y su valiosa ayuda. agradezco a todos los que me han ayudado, y de antemano agradesco la ayuda de esta duda.

[M@R!N@]

Bueno, a ver si te puede ayudar esto un poco:

Para poder pintar las filas del DBGrid, lo tienes que hacer por medio del evento OnDrawDataCell y con el Canvas.

Yo estuve experimentado un poco por aqui, igual es la primera vez que lo intento, pero bueno rústicamente lo que hice fue esto:

Dentro del evento OnDrawDataCell...

genero=Table1->FieldValues["Genero"];   //"genero" es un String, lo usé para poder compararlo con palabras... ^_^¡
if(genero=="Romance")
  {
  DBGrid1->Canvas->Brush->Color=clRed;         //Lo coloreo de rojo si es romance
  }
else if(genero=="Suspenso")
  {
  DBGrid1->Canvas->Brush->Color=clGreen;   //Si es Suspenso, entonces verde
  }
else if(genero=="Comedia")
  {
  DBGrid1->Canvas->Brush->Color=clYellow;  //Si es Comedia, amarillo
  }
else
  {
  DBGrid1->Canvas->Brush->Color=clWhite;   //Y digamos que los demás de blanco, claro tu puede poner el color que quieras a los géneros que quieras
  }
  DBGrid1->Canvas->FillRect(Rect);           //Una vez elegido el color, lo pinto, Rect es digamos un parámetro que te devuelve este evento, no se declara, ahi está siempre...
  DBGrid1->Canvas->TextOut(Rect.left,Rect.top,Table1->FieldValues[Field->DisplayName]);  //Para que se vea el texto

Si tienes alguna duda, o no le entiendes a esto, dímelo... y con gusto te ayudaré ^_^ suerte!

[airam]

hola amigo marin , bueno checare la opcion que me das, aun no he probado eso, pero ya me distes la logica, bueno te aviso si me sale o no, gracias por tu valiosa ayuda, Saludos.

[airam]

hola qur tal, oyes intente hacer lo que me dijistes con lo del DBgrid, pero no lo hace, recorro la tabla y comparo, pero no pinta la fila, hay veces q nada mas apunta a la fila, , pero no lo pinta, aun no se que sea, la otra opcion q deseo es que por medio de un boton pulse, y me pinte las filas, pero tampoco tengo idea, si podrias ayudarme por favor???,mira comparo la tabla, hago una condicion,si cumple la condicion lo q quiero es pintar la fila q lo cumple, pero no lo realiza.
Bueno si alguien podria ayurme se lo agradeceria mucho.Saludos.