تغییر مکان تکستها در کریستال ریپورت

[mortezamhd]

با سلام خدمت تمامی دوستان
میخوام اندازه فیلدهای توی گزارشم رو در حالت runtime تغییر بدم و در مواقعی اونهارو بچرخونم خوب دوستان حالا باید چکار کنم ؟؟؟:ناراحت:
با سپاس فراوان

[rezaei manesh]

این یه نمونه کد هست



Dim Fld As CrystalDecisions.CrystalReports.Engine.FieldObject
Fld = report1.Section3.ReportObjects("CheqeeDate1")
If Not CBool(reader("DateNumStatus")) Then
Fld.Width = 0
Else
obj = ReturnLocation(reader("DateNumLocation"), True)
If obj = -1 Then obj = ReturnLocation(.LblDateNumPrint.Location.X, True)
Fld.Left = obj
obj = ReturnLocation(reader("DateNumLocation"), False)
If obj = -1 Then obj = ReturnLocation(.LblDateNumPrint.Location.Y, False)
Fld.Top = obj
Fld.Color = ReturnColor(reader("DateNumColor"))
Fld.ApplyFont(ReturnFont(reader("DateNumfont")))
End If

[mortezamhd]

مرسی از شما دوست عزیز

چندتا سوال داشتم :

من اصلا از این کد چیزی سردرنیاوردم :گیج: میشه یک توضیح مختصری بدید ؟ آیا pdf آموزشی مخصوص برای همین کار دارید ؟

و ReturnLocationوreader مال چه کلاسیه ؟ :لبخند:

بی زحمت در صورت امکان یک پروژه بذارید

بازهم ببخشید :قلب:

[mortezamhd]

دوستان راهنماییم کنید لطفا

[rezaei manesh]

سلام
فایل اموزشی ندارم
reader نام یک دیتا ریدر هست که اطلاعات که تنظیم شده رو از بانک می خونه
ReturnLocation هم یک تابع هست که مکان هر ایتم رو برمی گردونه-توضیح مکان ایتم در روی فرم با مقدار اون درون کریستال فرق می کنه باید یک رابطه میان این دو پیدا کنی
من بای سعی و خطا یه چیز هایی رو پیدا کرده بودم
مثلا اگه رو فرم200 هست تو کریستال 1100 هست !
راه حل بهتری اون موقع نداشتم و...
شما سعی کن راه حل بهتری پیدا کنی