Grid Nesnesi

[crazybross]

Grid nesnesinin On Selection Changed evresine şu kodları yazdım

 

 

Not:Sorunlu kısım Başında Odano yazan input

 tablo = Grid.GetFocusCell("tablo");

 odano = Grid.GetCellText("tablo", tablo.Row, tablo.Column);

Input.SetText("oda", odano);

Aldığım sonuç istediğim gibi orda sıkıntı yok

 

 

 

Ancak yön tuşlarıyla grid nesnesinde hücreleri gezebiliyorum ve gezerken istediğim sonucu alamıyorum bana yanlış değer döndürüyor.
 

 

Bu sorunu çözebilirmiyiz ?

Edited May 10, 2015 by crazybross

[crazybross]

Baya uzun zaman oldu bunu düzeltmemiz mümkünmü hala cevap gelmedi ?

[pairs]

On key eventında yaz aynı kodları.

 

Ama on key event ında if e_Modifiers = sağtuş  gibi kontrol koyki sadece yön tuşlarıyla çalışsın kodlar

[KintaRo]

Grid nesnesinin On Selection Changed evresine şu kodları yazarsanız olacaktır:

odano = Grid.GetCellText("tablo", e_Row, e_Column);
Input.SetText("oda", odano);

pairs'e not: grid'de on key eventi yok hatta doğru düzgün event bile yok. ardı kökü 2 tane event var  :D

[pairs]

:trollface: ben gridin on key eventı yazmamışımki :D

[crazybross]

Kintaro abi kodlarım bu  dediğin kod çalışmadı Pairs sende bakabilirsen zahmet olacak ama

 tablo = Grid.GetFocusCell("tablo");


 Grid.SetFocusCell("tablo", tablo.Row, tablo.Column);

 
 odano = Grid.GetCellText("tablo", tablo.Row, tablo.Column);

Input.SetText("oda", odano);



if odano=="" then
GrafikTemizle()



else
Input.SetText("oda", odano);

	renk = Grid.GetCellColors("tablo", tablo.Row, tablo.Column);--secili rengi cek
	if renk.Background==49188 then--oda bos ise
	GrafikTemizle()
	else-- oda dolu ise
	rezerno = INIFile.GetValue("AutoPlay\\Docs\\ayarlar\\ayarlar.ini", "Musteriler", odano);
	yol="AutoPlay\\Docs\\musteriler\\"..odano.."\\"..rezerno..".ini"
	bilgial(yol)
	local hesap = String.Find(isim, " ", 0, false);
	local yeni_ad = String.Left(isim, hesap-1);
	local yeni_soyad = String.Replace(isim, yeni_ad.." ", "", false);
	Input.SetText("oda", odano);
	Input.SetText("ad", yeni_ad);
	Input.SetText("soyad", yeni_soyad);
	-----------------------------------
	Input.SetText("rno", String.Replace(odano..giris, ".", "", false));
	Input.SetText("pno", pasaport);
	Input.SetText("ksayi", kisisayi);
	-----------------------------------
	Input.SetText("gtarih", giris);
	Input.SetText("ctarih", cikis);
	Input.SetText("gsayi", kalinangun);
	------------------------------------
	Input.SetText("tutar", tutar);
	Input.SetText("bilgi", bilgi);
	Input.SetText("otipi", odeme);
		
	end


end--deger bossa ifi

[KintaRo]

Grid.SetFocusCell("tablo", tablo.Row, tablo.Column);

değil

Grid.SetFocusCell("tablo", e_Row, e_Column);

yazdım ben.

[pairs]

 

Çalışıyor bu şekilde

[crazybross]

Eyw çok teşekkür ederim 😊

[radyofon]

Bu şekilde veritabanına dayalı bir yazılım yapmak için dbase, microsoft access veya Filemaker ile daha kullanışlı olmaz mı?

[crazybross]

Tabiki daha sağlıklı olur,ancak şuan için ben ini dosyalarıyla böyle bir proje yaptım, ams acces verirabanı destekliyormu onu bilmiyorum,konuya hakim biri o sorunu cevaplasın ancak sqlite oracle ve mysql desteğini görmüştüm.