[fpc-pascal] MaskEdit
ik
idokan at gmail.com
Sun Jan 27 18:22:08 CET 2008
On Jan 27, 2008 6:25 PM, Marek Nožka <tlapicka at centrum.cz> wrote:
> Hallo
>
> I need to use MaskEdit in Lazarus 0.9.24. But the MaskEdit isn't on the
> component palette. I think that I call the Constructor an it will work.
> But no :-( My code:
>
> type
>
> TfrmZak = class(TForm)
> .
> .
> edtPSC:TMaskEdit;
> .
> .
> end;
>
> implementation
>
> procedure TfrmZak.FormCreate(Sender: TObject);
> begin
> edtPSC:=TMaskEdit.Create(Self);
> edtPSC.Left:=170;
> edtPSC.Top:=74;
> edtPSC.Visible:=TRUE;
> edtPSC.ParentColor:=False;
> edtPSC.Width:=30;
> edtPSC.Height:=18;
> edtPSC.TabOrder:=10;
> edtPSC.TabStop:=True;
> edtPSC.Text:='Ahoj';
> edtPSC.Show;
> edtPSC.SelectAll;
> edtPSC.SetFocus;
> end;
>
>
>
> The MaskEdit (instance edtPSC) isn't on form. I can't work with it.
> Where is BUG?
edtPSC.Parent := frmZak;
>
> Thank you all
>
> Marek Nožka
Ido
--
http://ik.homelinux.org/
More information about the fpc-pascal
mailing list