Вниз
Скачать: CL | DM;

Указатели   Найти похожие ветки 

 
Progh   (2005-01-08 07:19) [0]

Как создать указатель на тип из другого модуля ?

Например :
  Unit1;
  ...
 Form1 = class(TForm)
...
var
  a: TButton;

Unit2;
Uses Unit1;
...
Как создать тут указатель на Form1.a из первого Unit-a?


 
SergP ©   (2005-01-08 10:52) [1]


> Как создать тут указатель на Form1.a из первого Unit-a?


Зачем?

Чем тебе Form1.a не нравится?


 
dmk ©   (2005-01-08 13:23) [2]

var
 MyFormPtr: Pointer;

Примерно так. И без шуток.


 
Anatoly Podgoretsky ©   (2005-01-08 13:49) [3]

Progh   (08.01.05 07:19)  
SergP ©   (08.01.05 10:52) [1]
a не является членом класса TForm1


 
SergP ©   (2005-01-08 15:30) [4]


>  [3] Anatoly Podgoretsky ©   (08.01.05 13:49)
> Progh   (08.01.05 07:19)  
> SergP ©   (08.01.05 10:52) [1]
> a не является членом класса TForm1


Хм... Тогда
uses unit2;
и просто a


 
SergP ©   (2005-01-08 15:31) [5]


> a не является членом класса TForm1


Хм... Тогда
uses unit2;
и просто a

Т.е. var которые описаны во втором модуле будут видны и в первом.



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.032 c
1-1104921603
Bobby Digital
2005-01-05 13:40
2005.01.23
Key Delete


14-1104475289
Чеширский_Кот
2004-12-31 09:41
2005.01.23
PRC-файлы


14-1104623168
Германн
2005-01-02 02:46
2005.01.23
Новый Год - прекрасная пора!


14-1104716032
Marat_Ch
2005-01-03 04:33
2005.01.23
к561


1-1105263770
Андрей М.
2005-01-09 12:42
2005.01.23
SelectDirectory с возможностью создать папку




   Наверх