antipauli

Lo siento pero no veo diferencia entre lo que tienes y lo que pides...

A ver si te sirve esto: function Edad(FechaNacimiento: TDateTime): Smallint; var AnyoNac, MesNac, DiaNac: Word; AnyoHoy, MesHoy, DiaHoy: Word; begin DecodeDate(FechaNacimiento, AnyoNac, MesNac, DiaNac); DecodeDate(Date, AnyoHoy, MesHoy, DiaHoy);...

Puedes ponerlo en la propiedad <DisplayFormat> del campo : Si no lo has hecho ya : Doble click al TTable > boton derecho del raton > Add Fields añades los campos de la tabla para hacerlos persistentes Marcas el campo que quieres formatear y en el...

Lo que demandas es el uso de Callbacks o eventos en el objeto que, capturados inicialmente en un método con la misma estructura, permite hacer algo cuando ese evento es lanzado. Ejemplo: Unit 2 Tobjeto2 = class Type TonAndar = Procedure...

Busca en www.torry.net la palabra systray. Hay código allí que hace exactamente lo que quieres.

No he encontrado ninguna comparativa pero te indico un link donde encontrarás mucha información técnica sobre Teradata: http://www.info.ncr.com/Teradata/eTeradata-BrowseBy.cfm?page=Teradata%20Database

Aquí tienes varias cosas para probar... 1... procedure TForm1.MydrivecomboboxChange(Sender: TObject); begin try Mydirectorylistbox.drive := Mydrivecombobox.drive; except on EInOutError do messagedlg(#13 + 'the selected drive, or device is not ready'+...

En esta web encontrarás una implementación de XML-RPC en Delphi: http://www.codepunk.com/ Siento no poderte ayudar mucho más en el tema.

Ok, ahora te lo envío.

¿La función GetBitmap que espera que le pases un TBitmap, un TGraphic? Quizá se pueda SampleGrabber1. GetBitmat(Image1. Picture. Graphic). Es muy extraño.