في FastReport : كيف يمكنك تضمين نص EditText فيه

السلام عليكم ،،،

أي اصدار لـ fast Report تعمل عليه .

السلام عليكم ،،،

هذه الطريقة جربتها على الاصدار الثالث - لا أعلم هل ستعمل على الاصدار الثاني أم لا - .

تسقط تقرير frxReport1 على الفورم .

ثم تنتقل إلى أحداث التقرير وتختار حدث frxReport1GetValue

ثم تكتب الكود التالي :

procedure TForm1.frxReport1GetValue(const VarName: String;
  var Value: Variant);
begin
if CompareText(VarName,'hid') = 0 then Value := Edit1.Text;
end;

نذهب الى مصمم التقارير ونسقط memo  ونكتب داخلها المتغير الموجود بالكود السابق بهذا الشكل

[hid]

أتمنى أن تكون الاجابة واضحة .

شكرا أخي أبو محمد . . .