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

Помогите с преобразованим из TObject   Найти похожие ветки 

 
axx ©   (2003-12-03 14:08) [0]

Может вопрос и детский но... Помогите с проседурой Рид

Type
PDataOfClient = ^TDataOfClient;
TDataOfClient = packed record
dcID:Integer;
......
end;

Procedure Write
var
f:PDataOfClient;
begin
GetMem(f,SizeOf(f));
AThread.Data:=TObject(f); //AThread.Data - TObject
end;

Procedure Read
var
f:TDataOfClient;
FF:PDataOfClient;
begin
???????


 
Юрий Федоров ©   (2003-12-03 14:11) [1]

Во первых
Procedure Write
var
f:PDataOfClient;
begin
GetMem(f,SizeOf(f ^));
во вторых

Procedure Read
var
FF:PDataOfClient;
begin
FF:=PDataOfClient(AThread.Data);


 
Amoeba   (2003-12-03 14:12) [2]

TObject(f); - ничего себе преобразование типов: указателя на запись в указатель на экземпляр класса! Может для начала стоит выучить азы?


 
Reindeer Moss Eater ©   (2003-12-03 14:12) [3]

with PDataOfClient(AThread.Data)^ do
...


 
axx ©   (2003-12-03 14:14) [4]

To Amoeba Ну извините за глупость
To All Спасибо


 
Reindeer Moss Eater ©   (2003-12-03 14:18) [5]

TObject(f); - ничего себе преобразование типов: указателя на запись в указатель на экземпляр класса! Может для начала стоит выучить азы?

И что в этом такого криминального что бы бежать изучать азы?


 
Юрий Федоров ©   (2003-12-03 14:34) [6]

>>Amoeba (03.12.03 14:12) [2]
Нормальное преобразование, и то и другое - указатель, просто надо помнить, что там не объект и не вызывать его методы


 
axx ©   (2003-12-03 14:58) [7]

Может кинете ссылочку какую-нибуть про указатели,^,@ и т.д. и т.п.
Почитаю , поучусь - может такие вопросы задавать перестану.
:))))



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

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



Память: 0.46 MB
Время: 0.012 c
1-52184
axx
2003-12-03 14:08
2003.12.16
Помогите с преобразованим из TObject


6-52304
lasso
2003-10-21 10:32
2003.12.16
ping


14-52385
Woodpecker
2003-11-21 20:36
2003.12.16
Конкурс


3-52068
chtr
2003-11-25 10:05
2003.12.16
Не удается найти %1


14-52348
ИМХО
2003-11-23 06:28
2003.12.16
Новосибирск: как не заблудиться




   Наверх