[fpc-pascal] MaskEdit

ik idokan at gmail.com
Sun Jan 27 18:29:01 CET 2008


On Jan 27, 2008 7:25 PM, Christian U. <z0m3ie at gmx.net> wrote:
> Does it mean it exists an MaskEdit implementation that work ?
> In LCL ? Since when ?

Nop, but it will make sure that the component will exists inside a
specific boundary. With your code, it does not know where to place it
on the screen, so you can not see it.
Unless I didn't understand something in your question.

>
> ik schrieb:
>
> > 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


Ido
-- 
http://ik.homelinux.org/


More information about the fpc-pascal mailing list