Текущий архив: 2005.02.06;
Скачать: CL | DM;

Вниз

Create Tform   Найти похожие ветки 

← →
Змей ©   (2004-12-15 10:25) [0]

как создать форму? при нажатии на кнопку?
и чтобы на этой форме было RichEdit?
Спасибо!

---

← →
Dolt ©   (2004-12-15 11:00) [1]

Var
f:TForm;
begin
f:=TForm.create(Application);
with f do begin
 try
   with TRichEdit.create(f) do begin
     parent:==f;
     align:=alClient;
     end;
   f.ShowModal;
 finally
   free;
 end;
end;

---

← →
Dolt ©   (2004-12-15 11:02) [2]

эээ... поспешил :(
"==" заменить на "="
в конец добавить еще один end

---

Страницы: 1 вся ветка

Текущий архив: 2005.02.06;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.05 c