Ver Mensaje Individual
  #4  
Antiguo 14-02-2009
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Al menos en Delphi 2009 sí que está presente esa propiedad en el "TMemo". De todas formas, esa propiedad tiene su implementación en la clase "TCustomEdit", de la que hereda también el "TMemo". Quiere decirse, que, podrías usar una clase interpuesta sólo para publicar dicha propiedad. Para esto último, en la misma unidad o formulario donde estás usando el "TMemo" en cuestión, podrías añadir lo siguiente, justo antes de la declaración del tipo del formulario:

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes,
  Graphics, Controls, Forms, Dialogs, StdCtrls;

type
  TMemo = class(StdCtrls.TMemo)
  public
    property CharCase;
  end;

type
  TForm1 = class(TForm)
    Memo1: TMemo;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

end.

Si no ves necesario complicarte más la vida, en el propio evento "OnCreate" de dicho formulario, podrías hacer uso de la propiedad "CharCase", ya disponible en el "TMemo".
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita