Vlozenie richedit do zalozky – Delphi – Fórum – Programujte.com

ak si vytvorim v aplikacii novy richedit stylom...

procedure TForm1.Button1Click(Sender: TObject);

var

 i:integer;

  pole: array of Trichedit;



begin

setlength(pole,i);

    pole[i-1]:=Trichedit.Create(self);

    pole[i-1].Parent:=Form1;

    pole[i-1].BeveLInner:=bvNone;

    pole[i-1].BevelKind:=bkFlat;

    pole[i-1].BevelOuter:=bvRaised;

    pole[i-1].BevelWidth:=1;

   // pole[i-1].BorderStyle:=bsNone;

    pole[i-1].Height:=289;

    pole[i-1].MaxLength:=0;

    pole[i-1].Name:='miestnost';

    pole[i-1].Text:='fff';

    pole[i-1].left:=144;

    pole[i-1].top:=48;

    pole[i-1].ParentFont:=true;

    pole[i-1].ParentColor:=true;

    pole[i-1].SelAttributes.color:=clblue;

    pole[i-1].Font.color:=clwindowtext;

    pole[i-1].Color:=clWindow;

    pole[i-1].Width:=545;

    pole[i-1].Visible:=true;

    inc(i);



end;

jezis take low....
staci zadat parent:=Form1.nieco