Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
26/04/2011 10:49
Konu Sahibi
deliyurek1905
Yorumlar
8
Okunma
3159
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

deliyurek1905

Aktif Üye
Kullanici Avatari
Aktif Üye
29
09/04/2011
0
İstanbul
Belirtilmemiş
12/05/2011,16:00
Çözüldü 
Arkadaşlar ekteki dosyada kitap2 isminde bir rapor var bu rapordaki kitap_adi alanını büyüyebilir yaptım satır ayrımı yapmak içinde alanların altına düz bir çizgi çektim dolayısı ile kitap adı sığmayınca çizgi aşağı kayıyor ancak kitap_adı alanını diğer alanlardan ayırmak için alanların arasına koyduğum dik düz çizgi büyümyor ve kötü bir görüntü oluşuyor bu sorunu nasıl çözebilirim.


Ek Dosyalar
.rar   kutuphane.rar (Dosya Boyutu: 69,73 KB / İndirme Sayısı: 15)
Cevapla

Coskun0559

Uzman
Kullanici Avatari
Uzman
C.... Ç....
1.221
02/11/2008
505
Tekirdağ
-
11/10/2017,11:43
Çözüldü 
Raporunun açıldığında yordamına;

Visual Basic Code
Private Sub Report_Open(Cancel As Integer)
Çizgi23.Height = Me.kitap_adi.Height
End Sub

kodunu yaz


GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !
Cevapla

deliyurek1905

Aktif Üye
Kullanici Avatari
Aktif Üye
29
09/04/2011
0
İstanbul
Belirtilmemiş
12/05/2011,16:00
Çözüldü 
Arkadaşlar sorun devam etmekte büyüyebilir alan yapınca kötü bir görüntü oluşuyor.


Cevapla

deliyurek1905

Aktif Üye
Kullanici Avatari
Aktif Üye
29
09/04/2011
0
İstanbul
Belirtilmemiş
12/05/2011,16:00
Çözüldü 
Bütün alanların altına düz bir çizgi çekince, alan büyüdüğünde sadece büyüyen alanın olduğu satırdaki çizgi aşağı kayıyorda alanların arasına dik çizgi çekince niye olmuyor anlamadım gitti.


Cevapla

Coskun0559

Uzman
Kullanici Avatari
Uzman
C.... Ç....
1.221
02/11/2008
505
Tekirdağ
-
11/10/2017,11:43
Çözüldü 
dik çizgide dediğiniz özellik olmuyor fakat kitap adını ayırmak için kitap adı denetimine şekil anahattından çizgiler ekleyebilirsiniz.


GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !
Cevapla

kadirdursun

Gümüş Üye
Kullanici Avatari
Gümüş Üye
K.... D....
1.282
12/01/2009
86
İstanbul
Ofis 2010 32 Bit
21/09/2017,12:03
Çözüldü 
benimde böyle bir şeye ihtiyacım olmuştu. arkadaşlar daha önceden aşağıdaki çalışmayı yapmışlardı bende kendime uyarladım.

önce bir modül ekle ve modüle aşağıdaki kodu kopyala

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Option Compare Database

Public Sub MakeBoxesGrow(ThisReport As Report)
Dim X1 As Single
Dim X2 As Single
Dim Y1 As Single
Dim Y2 As Single
Dim Offset As Single
Dim Color As Long
Dim ThisControl As Control
Dim MaxHeight As Single

For Each ThisControl In ThisReport.Section(acDetail).Controls
If ThisControl.Visible = True Then
If ThisControl.Height > MaxHeight Then
MaxHeight = ThisControl.Height
End If
End If
Next ThisControl

ThisReport.ScaleMode = 1

Offset = 0
ThisReport.DrawWidth = 3
Color = RGB(0, 0, 0) '

For Each ThisControl In ThisReport.Section(acDetail).Controls
If ThisControl.Visible = True Then

X1 = ThisControl.Left - Offset
Y1 = ThisControl.Top - Offset

X2 = ThisControl.Left + ThisControl.Width + Offset
Y2 = ThisControl.Top + MaxHeight + Offset

ThisReport.Line (X1, Y1)-(X2, Y2), Color, B
End If
Next ThisControl

Set ThisControl = Nothing
End Sub


sonra raporda ayrıntı kısmında yazıldığında yordamına aşağıdaki kodu ekle

Visual Basic Code
Private Sub Ayrıntı_Print(Cancel As Integer, PrintCount As Integer)
MakeBoxesGrow Me
End Sub


tabi raporda alanların etrafındaki çerçeveleri kaldırman lazım.


Hayat bu
ölsende yaşamaya mecbursun!
UNUTMA!!!



(hafta sonu mesai olmadığından mesajlardaki çözümleri ancak hafta içi uygulayabiliyorum)
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü İf İçinde İki Tarih Veya Saat Arası Sorgusu Kullanılabilirmi burhanb 4 172 25/09/2017, 08:23 burhanb
Çözüldü Farklı Tablolar Arası Tarih Kriterli İşlemler ALTANs 3 316 25/07/2017, 16:08 ALTANs
Çözüldü İki Tarih Arası Sorgu Problemi AloneX 13 875 26/05/2017, 11:14 ozanakkaya
Çözüldü Tablolar Arası Aktarma Sorunu kübrashn 6 416 12/05/2017, 15:22 kübrashn
Çözüldü tablolar arası veri kopyalama moskovic 6 1.422 10/04/2017, 11:11 atoz112

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.