| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как сделатьт указатель на переменную? [D5, Win95/98, Win2k]
Art1 © (2002-05-17 15:31:00)У меня в первой форме есть переменная типа longint. Из под первой формы вызывается вторая форма. Кака мне передать указатель на переменную из первой формы и как во второй форме привоить значение этой переменной?
Art1 (2002-05-17 15:56:00) [1]Спасиба - сам вспомнил, хотя создавать тип указателя на стандартный паскалевский (дельфовский) тип небыло необходимости.
Но все равно, спасибо, что ответили.
AFROLOV (2002-05-17 15:41:00) [2]
Unit1;
//Здесь лежит форма1;
uses unit2..;
....
var
i:integer;
pInt:TpInt;
begin
pInt:=@i;
Form2.MyFunc(pInt);
....
end;
unit2
//Здесь лежит описание типа.
Type TpInt= ^integer;
.....
unit3;
//Здесь лежит форма2;
uses unit2...;
procedure TMainForm.AddPaternBtnClick(pInt:TpInt);
begin
pInt^=5;//Присваиваем значение.
end;
Игорь Шевченко (2002-05-17 15:34:00) [3]Книгу почитать :-) Любую, по Delphi
| |
