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

получить ListView.Data ?   Найти похожие ветки 

← →
psa247   (2008-01-28 09:08) [0]

Подскажите, как быть :)

создаю экземпляр класса, допустим FF
записываю указатель ListView.Data := @FF

а как обратиться к нему потом через

ListView.Data ??

---

← →
ketmar ©   (2008-01-28 09:14) [1]

а зачем тебе указатель на указатель на экземпляр?

---

← →
psa247   (2008-01-28 09:25) [2]

Вдумчиво почитал хелп :)
выходит надо так делать ?
type
  TFF = class
   
     end;

type
 pFF = ^TFF;

f : pFF;

f := Item.Data;

---

← →
ketmar ©   (2008-01-28 09:31) [3]

и опять ты не то прочитал.

хинт: результат вызова конструктора уже является указателем. достаточно привести его к типу Pointer.

---

← →
psa247   (2008-01-28 09:48) [4]

все равно ошибку выдает

---

← →
ketmar ©   (2008-01-28 09:50) [5]

17-я строка, как обычно.

---

← →
psa247   (2008-01-28 09:54) [6]

type
 TKontragent = class
   F: string;
   I: string;
   O: string;
   Passport: string;
   INNKPP: string;
   OGRN: string;
   Address: string;
   Info: string;
   Firm: boolean;
   Inostr: boolean;
 end;

type pTKontragent = ^TKontragent;

var
 Kontrs : array of TKontragent;

идет:
SetLength(Kontrs, IBQuery.RecordCount);
 with ListView do begin
    в цикле    
     Item := Items.Add;
     Kontrs[i] := TKontragent.Create;
     Item.Data := Kontrs[i];
 end;

в итоге:

обработчик OnSelectItem
var K: pTKontragent;

 K := Item.Data;
 if K=nil then exit;
 FEdit.Text := K.F; <- не доступно

---

← →
ketmar ©   (2008-01-28 09:56) [7]

а с чего ты решил, что TKontragent и pTKontragent — одно и то же? первое является указателем на экземпляр, второе — указателем на указатель на экземпляр.

---

← →
ketmar ©   (2008-01-28 09:57) [8]

кстати, зачем тебе тут класс? разве записи не достаточно? работать с указателем на запись, при помощи New() и Dispose().

---

← →
psa247   (2008-01-28 10:00) [9]

класс нужен для расширения функциональности на будущее

дошло наконец-то ))))

---

← →
ketmar ©   (2008-01-28 10:02) [10]

>[9] psa247(28.01.08 10:00)
ну, тогда уже сделай класс как полагается — со свойствами. вдруг потом что поменять захочешь? %-)

---

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

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



Память: 0.47 MB
Время: 0.026 c