var 

myform:tclform;

listview:tclprolistview;

designerpanel :TClProListViewDesignerPanel;

gorevne : tcledit;

addbtn : TCLButton;

gorevAdi : TCLprolabel;

insertQuery,selectquery: TCLSqlQuery;

testImg : TclproImage;

void ekledatabase;

{ 

try 

  clomosy.DBSQLServerQuery.Sql.Text='INSERT INTO tablo (gorev) Values ('+QuotedStr(gorevne.text)+')';

  clomosy.DBSQLServerQuery.ExecSql;

  ShowMessage('veri eklendi');

except

  ShowMessage('exception class: '+lastexceptionclassname+' exception message: '+lastexceptionmessage);

}

}

void gorevlistele;{

  try

  selectquery.sql.text='select gorev as MAIN_TEXT FROM tablo ';

  selectquery.open;

  if(selectquery.found){

    listview.clLoadlistviewDataFromDataset(selectquery);

  }

  else{

    ShowMessage('henüz görev yok!');

  }

 finally

 selectquery.free;

 selcetquery.close;

  }

}

void gorevekle;

{

  gorevAdi = myForm.AddNewProLabel(designerPanel, 'gorevAdi','test');

  designerPanel.AddPanelObject(gorevAdi,clCaption);

  gorevAdi.Properties.AutoSize = True;

}

void createlistview;{

  listview=myform.addnewprolistview(myform,'listview');

  ListView.Align = AlBottom;

  ListView.Margins.Bottom = 20;

  ListView.Margins.Top = 20;

  ListView.Margins.Right = 20;

  ListView.Margins.Left = 20;

  ListView.clProSettings.ViewType = lvIcon; //(lvList, lvIcon, lvWaterFall)

  ListView.clProSettings.ColCount = 1;

  ListView.clProSettings.ItemHeight = 100;

  ListView.clProSettings.ItemSpace = 10;

  ListView.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#fff2e0');

  ListView.clProSettings.BorderColor = clAlphaColor.clHexToColor('#995900');

  ListView.clProSettings.BorderWidth = 2;

  ListView.clProSettings.RoundHeight = 5;

  ListView.clProSettings.RoundWidth = 5;

  ListView.SetclProSettings(ListView.clProSettings);

}

void createdesignerpanel;{

  designerpanel=myform.addnewprolistviewdesignerpanel(listview,'designerpanel');

  DesignerPanel.Align = alMostTop;

  DesignerPanel.Height = 100;

  DesignerPanel.Width = 150;

  DesignerPanel.clProSettings.BorderColor = clAlphaColor.clHexToColor('#995900');

  DesignerPanel.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#82510d');

  DesignerPanel.clProSettings.IsTransparent = False;

  DesignerPanel.clProSettings.IsFill = True; 

  DesignerPanel.clProSettings.IsRound = True;

  DesignerPanel.clProSettings.RoundHeight = 20;

  DesignerPanel.clProSettings.RoundWidth = 20;

  DesignerPanel.clProSettings.BorderWidth = 2;

  DesignerPanel.SetclProSettings(DesignerPanel.clProSettings);

  ListView.SetDesignerPanel(DesignerPanel);

  

}

{

  myform=tclform.create(self);

  myform.SetFormBGImage(' https://i.pinimg.com/236x/a9/9c/97/a99c970cfcb894d66b3eb769778c204d.jpg" rel="nofollow - https://i.pinimg.com/236x/a9/9c/97/a99c970cfcb894d66b3eb769778c204d.jpg ')

  

  insertQuery=TCLSqlQuery.Create(nil);

  Clomosy.DBSQLServerConnect('SQL Server','DESKTOP-7\SQLEXPRESS','sa','...','liste',1433);

  insertQuery.Connection=clomosy.DBSQLServerConnection;

 

  createlistview;

  createdesignerpanel;

  gorevekle;

  

  gorevne=myform.addnewedit(myform,'gorevne','gorev nedir?..');

  gorevne.margins.bottom=10;

  gorevne.width=200;

  gorevne.height=80;

  

  addbtn=myform.AddNewButton(MyForm,'addbtn', 'ekle');

  addbtn.margins.top=150;

  addbtn.width=50;

  addbtn.height=30;

  

  myform.addnewevent(addbtn,tbeonclick,'ekledatabase');

  gorevlistele;

  myform.run;

}

Merhaba Tclprolistviewde MSSQL den veri çekip görüntülemek istedim fakat clLoadlistviewDataFromDataset() kısmında bilinmeyen metot uyarısı veriyor.Kaynaklarıda inceledim göremedim.Youtubeda Tcllistview için bu şekilde yapılmıştı.Pro ve normal arasında metot farklılığı mı var?

Merhaba Ceren,

TClProListView bileşeni için clLoadlistviewDataFromDataset() metodu geçerli değildir.

Bu metod sadece TClListView bileşeninde kullanılabilir.

Doğru olan metot:

listview.clLoadProListViewDataFromDataset(selectquery);
' https://www.docs.clomosy.com/index.php?title=TClProListView" rel="nofollow - https://www.docs.clomosy.com/index.php?title=TClProListView '

TClListView ve TClProListView bileşenleri yapısal olarak farklıdır; doğal olarak metodları da farklı çalışır.

Ayrıca, kodun 38. satırında değişken adı hatalı yazılmış. Bu da doğrudan derleme hatasına sebep oluyor.

Ek olarak, kullandığınız görselde hata oluşmuş olabilir.

Clomosy, sadece güvenli (HTTPS) bağlantılara ve doğrudan erişilebilen sunuculardaki görsellere izin verir. Eğer görsel yüklenmiyorsa bağlantı SSL sertifikası olmayan bir sunucuya ait olabilir.

Kolay gelsin