AccessTr.neT

Tam Versiyon: Raporlarda yazıyı iki yana yaslamak
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3 4 5 6 7
olmadı hocam yazı bir yerde kenarlıklar bir yerde
Sorun 3 tane metin kutusu olmasından kaynaklanıyor galiba, metin kutusunu 1 tane yapınca sorunsuz çalışıyor
evet hocam ama ben iki metin kutusunda bunu yapmaya çalışıyorum
Ozaman mecburen 23. mesajdaki örneği kullanacaksın, RTF2.ocx'i uygulamanın bilindiği klasöre ekle ve Araçlar/Activex denetimlerinden kaydet,
RTF2.ocx dosyasıyla ilgili herşeyi yaptım araç çubuğuna eklendi. ama forma girdiğimiz bilgileri raporda gösterirken yazı rapordaki alana sığmıyorsa yazının bir kısmı gözükmüyor. rtf control da büyüyebilir özelliği yok herhalde. metin kutusunda olduğu gibi bunu nasıl yaparız.
Raporda "Ayrıntı" (Detail) nın özelliklerinden büyüyebilir ve küçülebilir'i evet olarak belirle,

Ayrıntının biçimlendiğinde olayına aşağıdaki kodu yaz. (23. mesajdaki örnek)

Kod:
Dim Height As Integer

    Height = Me.RTFcontrol.Object.RTFheight
      If Height > 0 Then
        If Height < 32000 Then
            Me.RTFcontrol.Height = Height
        End If
    End If
    Me.Section(acDetail).Height = Me.RTFcontrol.Height + Me.RTFcontrol.Top

    If Me.RTFcontrol.Object.RTFheight > 0 Then
        If Me.RTFcontrol.Object.RTFheight < 32000 Then
            Me.RTFcontrol.Height = Me.RTFcontrol.Object.RTFheight
        End If
    End If
Sayfalar: 1 2 3 4 5 6 7