FastReport detail tablo gösterim sorunu

[hi_selamlar]

(13-07-2023, Saat: 01:25)Frrst Adlı Kullanıcıdan Alıntı:

(13-07-2023, Saat: 00:15)hi_selamlar Adlı Kullanıcıdan Alıntı: - SubReport kullanabilirsiniz.
- SQL ile verilerinizi birleştirip yazdırabilirsiniz.
- Memo içerisine 1. alanı, alt satıra geçip 2. alanı, alt satıra geçip 3. alanı ekleyebilirsiniz.

Cevap için teşekkürler sayın hocam.
Mevcut bilgimle tek tek uğraştım ama yapamadım :-(
Sql ile kayıt sayısını bulup ona göre detay tablodaki verileri Memo için nasıl yazdırabileceğim konusunda yardımcı olabilir misiniz? Sanırım en kestirme yol bu gibi ama emin değilim.


Şöyle yapmaya çalıştım ama "Object [ID] is not found." hatası aldım.

var
 sorgu: string;
begin
   sorgu := 'SELECT seviye FROM yetenek';
   FDQuery1.SQL.Clear;
   FDQuery1.SQL.Add(sorgu);
   FDQuery1.Open;
   while not FDQuery1.Eof do
   begin
     TfrxMemoView(frxReport1.FindObject('Memo1')).Lines.Add(FDQuery1.FieldByName('seviye').AsString);
     FDQuery1.Next;
   end;

Merhabalar,

Öncelikle sorgunuzun döngüsünü bitirip en son aşamada sonucu göndermeniz gerekli.

procedure TForm1.Button1Click(Sender: TObject);
var
 sorgu: string;
begin
    sorgu:='• Delphi 7'+#13+#10+
           '• Delphi XE'+#13+#10+
           '• Delphi XE3'+#13+#10+
           '• Delphi XE5'+#13+#10+
           '• Delphi XE7'+#13+#10+
           '• Delphi XE11'+#13+#10+
           '* DelphiCan.com';

    TfrxMemoView(frxReport1.FindObject('Memo1')).Memo.Text:=sorgu;

    frxReport1.ShowReport(True);
end;

   

Kolay gelsin.