01/12/2009, 15:34
Umarım bunu istiyorsunuzdur 
01/12/2009, 20:58
Ayhan
Süper bir bilgi.. Ben de bilmiyordum SourceObject olayını. Hiç de düşünmemiştim böyle bir komutla iş görülebileceğini. Çok iyi bir bilgi oldu benim için. Teşekkürler. + 5 Rep
Ama neden bu iş için daha pratik kullanımlı olan select..case yerine ısrarla if..then kullandığını anlamadım. Aynı işi bak ne kadar daha basit bir mantıkla yapıyorsun:
Senin kodların:
Bence:
Sence hangisi daha kolay ve basit
Süper bir bilgi.. Ben de bilmiyordum SourceObject olayını. Hiç de düşünmemiştim böyle bir komutla iş görülebileceğini. Çok iyi bir bilgi oldu benim için. Teşekkürler. + 5 Rep
Ama neden bu iş için daha pratik kullanımlı olan select..case yerine ısrarla if..then kullandığını anlamadım. Aynı işi bak ne kadar daha basit bir mantıkla yapıyorsun:
Senin kodların:
Kod:
If Açılan_Kutu0 = "Form1" Then
Alt10.SourceObject = "Form1"
Else
If Açılan_Kutu0 = "Form2" Then
Alt10.SourceObject = "Form2"
Else
If Açılan_Kutu0 = "Form3" Then
Alt10.SourceObject = "Form3"
Else
If Açılan_Kutu0 = "Form4" Then
Alt10.SourceObject = "Form4"
Else
Alt10.SourceObject = ""
End If
End If
End If
End IfBence:
Kod:
select case Açılan_Kutu0
case "Form1"
Altform.SourceObject = "Form1"
case "Form2"
Altform.SourceObject = "Form2"
case "Form3"
Altform.SourceObject = "Form3"
case "Form4"
Altform.SourceObject = "Form4"
end selectSence hangisi daha kolay ve basit
01/12/2009, 23:42
(01/12/2009, 15:34)ayhan2122 yazdı: [ -> ]Umarım bunu istiyorsunuzdur
evet istediğim bu sn ayhan2122 fakat kodlarınızı programa uyarladığımda çalışmadı. Altform alanında hiçbirşey göstermiyor. Bir de bu altformların ana formla bire bir işkodu ile ilişkileri mevcut.
02/12/2009, 12:12
sn admin bu eklenti sorununa bir çözüm bulsanız da bu konuyu çöpten çıkarsak
02/12/2009, 12:33
02/12/2009, 13:47
İnternet tarayıcı olarak hangi programı (ie8-mozilla) kullanıyorsunuz bilmiyorum ama tarayıcınızı kaldırıp yeniden kurmanızı tavsiye ederim.
ÜstForm ile Altformu aşağıdaki kodları kullanarak birbirine bağlayabilirsiniz.
AltFormAdı.LinkMasterFields = "ÜstFormdakiAlanAdı"
AltFormAdı.LinkChildFields = "AltFormdakiAlanAdı"
Ayrıca örnekte "if...then" yerine "Select case" kullandım, inceleyiniz.
Bir de işkodu'nu da otomatik yaptım.
ÜstForm ile Altformu aşağıdaki kodları kullanarak birbirine bağlayabilirsiniz.
AltFormAdı.LinkMasterFields = "ÜstFormdakiAlanAdı"
AltFormAdı.LinkChildFields = "AltFormdakiAlanAdı"
Ayrıca örnekte "if...then" yerine "Select case" kullandım, inceleyiniz.
Bir de işkodu'nu da otomatik yaptım.