Форум: "Основная";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];
ВнизКак сделатьт указатель на переменную? Найти похожие ветки
← →
Art1 (2002-05-17 15:31) [0]У меня в первой форме есть переменная типа longint. Из под первой формы вызывается вторая форма. Кака мне передать указатель на переменную из первой формы и как во второй форме привоить значение этой переменной?
← →
Игорь Шевченко (2002-05-17 15:34) [1]Книгу почитать :-) Любую, по Delphi
← →
AFROLOV (2002-05-17 15:41) [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;
← →
Art1 (2002-05-17 15:56) [3]Спасиба - сам вспомнил, хотя создавать тип указателя на стандартный паскалевский (дельфовский) тип небыло необходимости.
Но все равно, спасибо, что ответили.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.005 c