Lazarus

Ajustar DBSpinEdit a la derecha (Importes)

Alinear importes a la derecha en un campo DBSpinEdit Este post es relámpago, ya que he buscado información por la web y no la he encontrado. Veamos como podemos solucionar la alineación de los campos DBSpinEdit a la derecha, como debe ser en los campos numéricos. Aquí el código… procedure Tmiformulario.AjustarDerechaImportes(); var inxs:integer; begin for […]

Ajustar DBSpinEdit a la derecha (Importes) Leer más »

Enviar email desde Lazarus smtp indy

    Cómo enviar emails desde [Lazarus] con Indy 10.   Incluimos las unidades necesarias para el proyecto. En este caso las unidades imprescindibles para que funcione el envío de email usando TSL son: IdSMTP IdMessage IdAttachmentFile IdIOHandler IdIOHandlerStack IdSSL IdSSLOpenSSL IdExplicitTLSClientServerBase La unidad quedaría así: uses Classes, SysUtils,Windows,DBGrids,Graphics,ZAbstractRODataset,ZDataset,DB,WinSock, IdSMTP,IdMessage,IdAttachmentFile, IdIOHandler, IdIOHandlerStack, IdSSL,IdSSLOpenSSL, IdExplicitTLSClientServerBase;  

Enviar email desde Lazarus smtp indy Leer más »

Insertar un Combo de otra tabla en un DBGrid

¿Cómo insertar un combo dentro de un dbgrid? unit provincia; {$mode objfpc}{$H+} interface uses Classes, SysUtils, db, FileUtil, Forms, Controls, Graphics, Dialogs, DbCtrls, DBGrids, Grids; type { TForm4 } TForm4 = class(TForm) DBGrid1: TDBGrid; DBLookupComboBox1: TDBLookupComboBox; DBNavigator1: TDBNavigator; dsProvincia: TDataSource; dsPais: TDataSource; procedure DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); private

Insertar un Combo de otra tabla en un DBGrid Leer más »

Scroll al inicio