04/04/2010, 12:04
05/04/2010, 16:36
(04/04/2010, 12:04)ercansahin yazdı: [ -> ]Hatanın resmi yerine kendisini eklerseniz bakabiliriz...Referances bölümünü kontrol ettinizmi?
Biraz ugraştım üstünde şu kanıya vardım...Etiketin arkaplanı saydam durumda iken resimdeki hatayı veriyor ama etikete herangi bi arkaplan rengi eklediğim zaman verdiğiniz kodlar sorunsuz çalışıyor...Bende arkaplan saydam olsun istiyorum acaba benim Access de bi sorun mu var ?
05/04/2010, 16:55
sayın zanzara;
resimdeki hata mesajında Etiket34 yazıyor.sizin eklediğiniz ilk örnekte etiket24 var etiket isimlerini kontrol edebilirsiniz kodlar içinde önceki denemelerinizden birşeyler kalmış olabilir.(kodda etiket34 olabilir form üzerinde etiket24 vardır).sayın şahinin 4üncü mesajdaki örneği sorunsuz çalışıyor.sistem vista galiba?
resimdeki hata mesajında Etiket34 yazıyor.sizin eklediğiniz ilk örnekte etiket24 var etiket isimlerini kontrol edebilirsiniz kodlar içinde önceki denemelerinizden birşeyler kalmış olabilir.(kodda etiket34 olabilir form üzerinde etiket24 vardır).sayın şahinin 4üncü mesajdaki örneği sorunsuz çalışıyor.sistem vista galiba?
05/04/2010, 18:27
Eklediğim örnege bakınız 2 etiket kodları da aynı ama birinde arkaplan rengi gri birinde saydam... Benim istedigim tarz gri arkaplanlı olan etiket ama biçimi de saydam olsun istiyorum...Bi çözüm bulabilirsek çok sevinirim.
05/04/2010, 19:11
Merhaba..
İstediğiniz, sadece seçiliyken etiketin arkaplanının renkle dolması, ayrıntıda da seffaflaşması ise etiketin backstyle özelliğini kullanın.. Normal görünüm için 1 şeffaf görünüm için 0 değeri atayabilirsiniz..
Önerim doğrultusunda, örneğiniz için ayrıntı ve etiket kodlarını veriyorum..
İstediğiniz, sadece seçiliyken etiketin arkaplanının renkle dolması, ayrıntıda da seffaflaşması ise etiketin backstyle özelliğini kullanın.. Normal görünüm için 1 şeffaf görünüm için 0 değeri atayabilirsiniz..
Önerim doğrultusunda, örneğiniz için ayrıntı ve etiket kodlarını veriyorum..
Kod:
Private Sub Ayrıntı_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Etiket0.ForeColor = 0
Me.Etiket0.BorderColor = 0
Me.Etiket0.BackColor = -2147483633
Me.Etiket1.ForeColor = 0
Me.Etiket1.BorderColor = 0
Me.Etiket1.BackStyle = 0
End Sub
Private Sub Etiket1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Etiket1.BackStyle = 1
Me.Etiket1.ForeColor = 16777215
Me.Etiket1.BorderColor = 65280
Me.Etiket1.BackColor = 65280
End Sub