ListView Control '' has no parent window

[AliZairov]

Merhaba. ListViewi normal create ediyorum sorun olmuyo. Amma Formsuz bir unit içerisinde parent olmadığından Control '' has no parent window hatası alıyorum. Nil dediğim halde sorun veriyo.

[mrmarman]

Muhtemelen bir önceki SubTitle parse olayı üzerine çalışırken karşılaştığın bir sorun. Parametre olarak TWinControl sınıfından bir şeyi API içine yollama.. Bir TStringList create edip onu yolla. Sonra dönüşte bunu ListView'e aktarırsın.

(1) Bir Type tanımla
(2) Buna bir Pointer ekle
(3) API içerisinde AddObject ile parametre olarak yolladığın bu TStringList'i doldur.
(4) Dönüşte Objects içinden çekeceğin parse edilerek bu TYPE ile bileşenlerine ayrılmış replikleri ListView'e aktarırsın.

Senin için anlaşılır olması adına aşağıda Type tanımını vereyim sen onun üzerine kat çıkarsın.

Kod: Tümünü seç

type
  pInfo = ^tInfo;
  tInfo = Record
    idx       : Integer;
    StartTime : string;
    EndTime   : string;
    Text      : string;
  end;

pInfo kısmını TSringList'e AddObject ile ekleyebilirsin.
Böylece Parse ederek elde ettiğin tInfo içeriği olduğu gibi TStringList'e bindirilmiş olur.

Başarılar.