Ver Mensaje Individual
  #4  
Antiguo 13-04-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Mediante el DBLookupListBox, tál como dice Caro, parece no ser viable.

Pero para agregar otra opción, se me ocurre que podés hacer algo desde el campo que estás mostrando en el DBLookupListBox:
Código Delphi [-]
...
type
  TForm1 = class(TForm)
  ...
  private
    procedure AlinearDBLookupListBox(Alineado: TAlignment);
  end;
...
implementation
...

procedure TForm1.AlinearDBLookupListBox(Alineado: TAlignment);
begin
  DataSet.FieldByName('TU_CAMPO').Alignment:= Alineado;
end;
...

Ejemplo de llamada:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  AlinearDBLookupListBox(taCenter); //taLeftJustify, taRightJustify, taCenter
end;
Claro está que de este modo, son afectados todos los Data Controls que hagan referencia a ese TField. Es decir que si utilizas tambien un DBGrid
que contenga ese campo, allí también se reflejará el cambio de alineación...

Un saludo.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 13-04-2011 a las 21:28:02.
Responder Con Cita