Giriş yapmadınız. Lütfen giriş yapın yada kayıt olun.
Add Object txtDeneme As myOptiongroup With ;
ButtonCount = 4, ;
BackStyle= 0 , ;
FontSize = 12, ;
Option1.Caption = "Secim1", ;
Top = 27, ;
left = 865, ;
Width = 100, ;
Height = 100, ;
Enabled = .T.
**** Seçim1 yazısını ekrana yazmıyor ?
Sorun ne olabilir ?
MyOptionGroup adinda optiongrup classin varmi ?
Var ise oneri : txtdeneme diye obje ismi verme ben koda bakinca onun optiongroup degilde textbox oldugunu sanirim onun yerine opdeneme gibi birsey ver
Bu arada hep hatirlatiyorum umarim bozulmuyorsundur ama gorsel yapabilmek varken kodla yapmaya calisarak kendine iskence ediyorsun:(
**************************************************
*-- Class: test (c:\documents and settings\administrator\desktop\test.vcx)
*-- ParentClass: form
*-- BaseClass: form
*-- Time Stamp: 02/26/12 01:41:01 PM
*
DEFINE CLASS test AS form
DoCreate = .T.
Caption = "Form1"
Name = "Form1"
ADD OBJECT optiongroup1 AS optiongroup WITH ;
ButtonCount = 2, ;
BackStyle = 0, ;
Value = 1, ;
Height = 46, ;
Left = 36, ;
Top = 36, ;
Width = 71, ;
Name = "Optiongroup1", ;
Option1.Caption = "test", ;
Option1.Value = 1, ;
Option1.Height = 17, ;
Option1.Left = 5, ;
Option1.Top = 5, ;
Option1.Width = 61, ;
Option1.Name = "Option1", ;
Option2.Caption = "Option2", ;
Option2.Height = 17, ;
Option2.Left = 5, ;
Option2.Top = 24, ;
Option2.Width = 61, ;
Option2.Name = "Option2"
ENDDEFINE
*
*-- EndDefine: test
**************************************************
Soykan.
Bu örnek çok yararlı oldu. Teşekkürler.
Soykan haklısın. Görsel yapma konusunda bakmaya çalışıyorum.
Eski kodlarım bu şekilde olduğu için bu projeyi bu şekilde devam ettiriyorum.
Yeni bir projede görsel olarak bir deneme yapacağım.
Bir de yukarıdaki konuya ek olarak.
Bu seçim şeklini DİKEY yerine YATAY seçin yaptırabilirmiyiz ?
Tabiki option1 ve option2 nin top,left degerleri ile oynayarak yapabilirsin ama gene karsina gorsel tasarim cikiyor (: birkac saniyede yeni seklini verebilirsin diger turlu kor dogusu gibi 
birkac denemede ancak tutturursun istedigini...