Genel İşlemler - kasa işlemleri yapma

kasa işlemleri yapma

Nereden Yazdırıldığı: Clomosy | Forum
Kategori: Genel Programlama
Forum Adı: Genel İşlemler
Forum Tanımlaması: TRObject dili ile programlama yaparken karşılaşılan genel işlemler
URL: https://forum.clomosy.com.tr/forum_posts.asp?TID=563
Tarih: 07 Ocak 2025 Saat 23:17
Program Versiyonu: Web Wiz Forums 12.07 - https://www.webwizforums.com

Konu: kasa işlemleri yapma

Mesajı Yazan: Zeren
Konu: kasa işlemleri yapma
Mesaj Tarihi: 16 Ağustos 2023 Saat 15:37

kabaca

if ülke alındıysa then

banka_parasi:=banka_parasi+ülke_parasi and oyuncu_parasi:=oyuncu_parasi-ülke_parasi;

end;

gibi birifade kullanmak istiyorum bunu tek tek her ülkenin procedüründe mi tanımlamalıyım yoksa aşağıya attığım SQL procedüründe bu işlemi yapabilir miyim ekstra olarak ben bi şeyler deniyorum ama en aşağıda 2- olarak attığım tanımlama kodunda hata alıyorum

1-procedure AddDataToListview;

Var

foodListQuery : TClSqlQuery;

begin

foodListQuery := TClSqlQuery.Create(nil);

if (testRadio.isChecked) then

begin

try

ShowMessage(Clomosy.AppUserDisplayName);

foodListQuery.Connection := Clomosy.DBSQLServerConnection;

isim := LastSender.caption;

// ShowMessage(isim);

foodListQuery.SQL.Text := 'update dbo.arsa set alan_kisi = '+quotedstr(Clomosy.AppUserDisplayName)+'

where isim = '+quotedstr(isim);

ShowMessage(foodListQuery.Sql.Text);

foodListQuery.ExecSql;

ShowMessage('Kayıt işlemi başarılı');

finally

foodListQuery.Close;

foodListQuery.Free;

end;

else begin

ShowMessage('Doğru giriniz');

end;

2-pb1, //player1 bakiye

bb, //banka bakiye

cinp,kanadap,italyap,ingilterep,turkiyep,korep,almanyap,ukraynap,rusyap,misirp,abdp,norvecp,fransap:Integer; // ülke paraları

begin

pb1:=5000;

bb:=10000;

cinp:=500; italyap:=700; ingilterep:=1000; turkiyep:=4000; korep:=600; almanyap:=780; ukraynap:=300; rusyap:=680;

misirp:=250; abdp:=1500; norvecp:=700; fransap:=800;

end;

Cevaplar:

Mesajı Yazan: Alforce
Mesaj Tarihi: 16 Ağustos 2023 Saat 17:18

Değişkenlere, componentlerde olduğu gibi ismi ile ulaşamazsınız.

Eğer işiniz dinamik ise hepsini bir listede tutup sırayla işlem yapabilirsiniz,

Ama işleminiz statik ve az ise hepsini el ile yazmak daha kolaydır.

Eğer dinamik bir sistem oluşturmak istiyorsanız daha detaylı anlatırsanız sevinirim.