Jump to content

Veri Giriş ?


beydere

Recommended Posts

hocam yine diktürmüşün örnek harika vallahi inanın hayram kaldım teşekkürler.

1-hocam sizin örnekte isa avcı adında bir klasör ve isa avcı adında bir ini oluştu

-girilen isim ve soyatların tutulduğu bir dosya ve bir ini yani programa girilen bütün isimler bir

yerde tutulacakki daha sonra listboxta bu isimler gösterilecek.form2 ve form3 listbox değerlerini

buradan alacak

-sadece isa avcı olarak değil ocak-şubat gibi 12 tane ini olacak

bütün bunlar ilk girişte bunlar oluşturulacak daha sonra form2 geçecek geçilecek

-form2den seçilen değer form3 gösterilecek

tabiki sizce daha uygun başka şekli varsa oda olabilir

form3 de sağ tarafta tutulan kayıtlar var bunlar çalışma mantığı şöyle olacak

combo ilk başta oluşturulan ocak şubat ini seçilince inputlar gösterecek yoksa yazılan değerleri kaydet

dedikmi aynı iniye kaydedecek sıfırla dediğimiz zamanda sıfırlayacak

bul dediğimiz zaman listboxtaki isim buluınacak tekrar ona tıkladıkmı sağ tarafta ilgili kayıtlar oluşacak

not form4 şekilde ayrımı kullanımı daha mantıklıysaöyle olsun.

hocam ateş olmayan yerden duman tütmezmiş anladımki siz bana yardımcı olacaksın size şu an verebileceğim duadır

herşey gönlünüzce olsun hayat hiç bir zaman sizi üzmeye muvaffak olamasın cebinizi giren paranın

hesabının içinden bankacılar bile çıkamasın....

===========================

hocam her şey için geç değilse en son şekli formun bu

Please register to see this content.

===========================

Link to comment
Share on other sites

@isaavcı

Tamam mantığı az çok anladım sayılır.(umarım) Ama niye tüm ayarlar farklı ini dosyalarında tutuluyor?

Hepsi tek bir ini dosyasında tutulsa daha iyi ver derli toplu olmaz mı?

Diğer taraftan uzun kodlarını biraz kısalttım. Neyse bir ara tekrar senin au3e göz atarım...

Kolay gelsin...

_MAIN_FORM()

Func _MAIN_FORM()
	Local $X = 265, $Y = 35
	$Form1_1 = GUICreate("Form1", 650, 550, 190, 118)
	GUISetFont(8, 800, 0, "MS Sans Serif")
	$List1 = GUICtrlCreateList("", 8, 8, 241, 526)
;~ $Combo1 = GUICtrlCreateCombo("Ay Seçin", 251, 8, 367, 25)
	$Date1 = GUICtrlCreateDate("", 265, 8, 370, 20)
	GUICtrlSendMsg($Date1, 0x1032, 0, "MMMM")


	Global $INPUT_BOX[31][5]
	For $I = 1 To 31
		GUICtrlCreateLabel($I & "=", $X, $Y, 18, 17)
		$INPUT_BOX[$I - 1][0] = GUICtrlCreateInput("", $X + 25, $Y, 25, 20,0x2000)
		$INPUT_BOX[$I - 1][1] = GUICtrlCreateInput("", $X + 55, $Y, 25, 20,0x2000)
		$INPUT_BOX[$I - 1][2] = GUICtrlCreateInput("", $X + 85, $Y, 25, 20,0x2000)
		$INPUT_BOX[$I - 1][3] = GUICtrlCreateInput("", $X + 115, $Y, 25, 20,0x2000)
		$INPUT_BOX[$I - 1][4] = GUICtrlCreateInput("", $X + 145, $Y, 25, 20,0x2000)
		$Y += 30
		If $I = 16 Then
			$X += 200
			$Y = 35
		EndIf
	Next

	GUICtrlCreateLabel("Toplam", 465, 490, 50, 17)
	$Input156 = GUICtrlCreateInput("", 515, 485, 120, 21)
	$Button1 = GUICtrlCreateButton("Kaydet", 251, 510, 172, 25, 0)
	$Button2 = GUICtrlCreateButton("Yeni Kayıt", 446, 510, 174, 25, 0)

	GUISetState(@SW_SHOW)
	#EndRegion ### END Koda GUI section ###

	While 1
		$nMsg = GUIGetMsg()
		Switch $nMsg
			Case -3
				Exit

		EndSwitch
	WEnd
EndFunc   ;==>_MAIN_FORM

Link to comment
Share on other sites

@isaavcı

Malesef halen kafamda soru işaretleri var. Kafamda tam olarak ne yapmak istediğini canlandırabilseydim, şimdiyeli bitmişti ve sen rutuşları yapıyordun :(

Tekrardan kısa bir özet geçersen fena olmaz.

İlk şu isim soran guinin başlangıçta çalışmasına ne gerek var? Sen biraz toparla, ve tekrar yaz. Hallederiz...

Link to comment
Share on other sites

hocam harika programımız kıvamına geliyor...

[isa avcı_january]

1=

[isa avcı_feburary]

1=

[isa avcı_march]

1=

[isa avcı_april]

1=

[isa avcı_may]

1=

[isa avcı_june]

1=

[isa avcı_july]

1=

[isa avcı_august]

1=

[isa avcı_september]

1=

[isa avcı_october]

1=

[isa avcı_november]

1=

[isa avcı_december]

1=

====================

anladığım kadarı ile

[isa avcı_january]

1=

2=

3=

diye devam edecek bu evet istediğim bu.

toplam o formdaki bütün inputların değerlerini toplayacak 31 input var diyelimki 20 tanesi sifır iken 10 tanesine değer girildi bu değerleri toplayacak.aslında her aya ait toplamlarında toplanması daha hoş olur fakat sizi zorlamıyorum.

şimdi combodan şubat ayını seçtimmi seçtim tüm değerler sıfır olarak ayarlanmış ayarlanmış kullanıcı hangi değerleri girdiyse kaydet dedimi her güne ait 5 inputun degerlerini kaydedecek bir sonraki açtığımda şubat ayına tıkladımmı en son girilen değerlerle açılacak veya sıfırla dediğim zamanda tüm değerleri varsayılan yapacak.

========================

ay seçilecek inputlara günü birlik girilen değerler kaydedilecek ve toplam inputtada toplanacak. bu gerçekleştimi bu bir tane olacak bunuda nasıl çoğaltırız gösterdinizmi eyvallah.

Link to comment
Share on other sites

Hocam ellerine sağlık bende düzenlemeler yaptım ve program düzene girdi. Fakat bir ricam olucak. Ben denedim ama nedende hep eksiklikler oldu. Şimdi ben buna random komutu ve çıktı komutu eklemek istiyorum. Random komutu Kayıt No için olucak. Çıktıyıda düzenleye ekleyebilirsen iyi olur Düzenleye basınca yani Çıktı al diye bir buton. Sanırım çıktı komutunu filan ardından ben toplaya bilirim. Yani sen kafa taslak ayarlasan bile yeter hocam. Fazla yormak istemiyorum seni

Please register to see this content.

Teşekkürler ;)

Link to comment
Share on other sites

hocam harika bir çalışma olmuş ben yüzlerce form derken siz bir formda bitirmişiniz. şimdilik tadını çıkartıyım yine görüşürüz...

hocam ben size sıfır ve bir girilecek dedim diğer hiç bir seçeneği kabul etmiyor

birde kodlarda hangi satırlar neyi temsil ediyor bize neler anlatıyor kod üzerinde gösterebilir veya bir örnek dosyayı alabilirmiyim

Link to comment
Share on other sites

@isaavcı

Anlamadım, 0 rakamını silip 1 yazamıyormusun?

Ilgili script uzun olduğu için, anlatmam gerçekten uzun zamanımı alacaktır. Bu konuda beni mazur gör.

Kodları inceleyip yavaş yavaş, zaman ile örnekler kendini geliştirebilirsin.

Uyarı sevieyesiyle neyi kastediyorsun?

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...