Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.09;
Скачать: CL | DM;

Вниз

Компоненты во время работы   Найти похожие ветки 

 
stas_a   (2002-11-28 13:09) [0]

Здрасть есть код

unit Unit1;

interface

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

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
compon:array[1..2] of tComponent;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
compon[1]:=Tmemo.Create(Self);
With compon[1] do
begin
top := 200;
Left := 50;
Width:=200;
Height:=200;
Text := "proverka";
end;
end;

end.

Форма с кнопкой.
При нажатии у меня форма становится 200 на 200 сверху 200 слева 50 а Memo не создаётся вообще помогите плииз.


 
MBo ©   (2002-11-28 13:12) [1]

нужно еще
1) назначить Parent
2) with (compon[1] as TMemo) do ...


 
stas_a   (2002-11-28 13:14) [2]

Спасибо буду пробовать.



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

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

Наверх




Память: 0.47 MB
Время: 0.023 c
3-27826
Glivinsky
2002-11-20 14:32
2002.12.09
IB/FB D5 Blob поля. Как ?


3-27837
Akhmadey
2002-11-19 21:45
2002.12.09
Лучший генератор отчетов


6-28174
Геннадий
2002-10-11 20:35
2002.12.09
Как узнать размер странички html (файла на веб-узле)?


14-28233
Шишкин Илья
2002-11-16 07:50
2002.12.09
Кто-нибудь знает как пользоваться ettercap?


1-28127
FROM_X
2002-11-28 17:03
2002.12.09
Innerfuse Pascal Script