programda kullandığım değişkeni sonradan değiştirmek?

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Kullanıcı avatarı
AliErdem
Üye
Mesajlar: 157
Kayıt: 16 Nis 2006 02:57

programda kullandığım değişkeni sonradan değiştirmek?

Mesaj gönderen AliErdem »

kutuphane otomasyonda kitap getirme işlemi gecikince ceza kesilmesi gerekiyor ben bunu program içerisinden standart örneğin günlük 25 ykr yaptım hesaplamayı yapıyor ama program çalışırken ben isteğe göre bu değişkeni güncellemek istiyorum
x:integer=250;
begin

ceza:=a * x;
ytl:=ceza/1000;
yukarıdaki X değişkeninden bahsediyorum bunu sonradan nasıl değiştirebilirim
fduman
Moderator
Mesajlar: 2749
Kayıt: 17 Ara 2004 12:02
Konum: Ankara

Mesaj gönderen fduman »

Kod: Tümünü seç

x:= 300;
diyerek
Kullanıcı avatarı
AliErdem
Üye
Mesajlar: 157
Kayıt: 16 Nis 2006 02:57

Mesaj gönderen AliErdem »

:) yok sen anlamadın beni program .exe halinde çalışırken mesela bi ayarlar penceresini açacağım ve günlük ceza miktarını ordan girerek değiştireceğim yani "x" i
Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

Mesaj gönderen nitro »

x: in global bir değişken olarak tanımla. program çalışırken mesela

Kod: Tümünü seç

button1.click
begin
x:=strtoint(edit1.text);
end;
Kullanıcı avatarı
Ernesto1968
Üye
Mesajlar: 3
Kayıt: 23 Nis 2006 03:21
Konum: İstanbul/Avrupa

cvp

Mesaj gönderen Ernesto1968 »

_Merhaba kardeş. Önce Gobal bir sabit tanımla. Yanlız. sabit tanımlarken. cons kısmına {$j+} kodunu yazmayı unutma. boylece porogramın istediğin yeriden bu sabiti değiştire bilirsin. Böylece sen programı kapatsan bile Değerini unutmaycaktır. İstersen bi veri tabanınına da bağlayabilirsin bu değişkeni. hadi kolay gelsin._
repeat
if kalbin.atıyorsa then
çalış.özgürlük.için;
until zafere.kadar;
Kullanıcı avatarı
AliErdem
Üye
Mesajlar: 157
Kayıt: 16 Nis 2006 02:57

Mesaj gönderen AliErdem »

nitrokonat arkadaşım senin dediğin gibi yaparsam programa herseferinde bi değer göndermek zorundamı oluyorum yani o şekildede aklında tutuyormu?
fduman
Moderator
Mesajlar: 2749
Kayıt: 17 Ara 2004 12:02
Konum: Ankara

Re: cvp

Mesaj gönderen fduman »

Ernesto1968 yazdı:Böylece sen programı kapatsan bile Değerini unutmaycaktır.
O nasıl oluyor?
fduman
Moderator
Mesajlar: 2749
Kayıt: 17 Ara 2004 12:02
Konum: Ankara

Mesaj gönderen fduman »

AliErdem yazdı:herseferinde bi değer göndermek zorundamı oluyorum yani o şekildede aklında tutuyormu?
Program kapatıldığında tabii ki verdiğin öntanımlı değere geri dönecektir. Sakalsın istiyorsan farklı teknikler mevcut. Veritabanında saklar sonra geri yüklersin. INI dosyada tutarsın vs.
Demitri

Re: cvp

Mesaj gönderen Demitri »

coderlord yazdı:
Ernesto1968 yazdı:Böylece sen programı kapatsan bile Değerini unutmaycaktır.
O nasıl oluyor?
ben de merak ettim doğrusu.
o zaman regedite ne gerek var :?: :D
Kullanıcı avatarı
Trial_Cooder
Üye
Mesajlar: 236
Kayıt: 17 Nis 2006 04:44

Mesaj gönderen Trial_Cooder »

Bunun İçin Exemod Kullanman Lazım Kısa Ve Öz Olarak Anlatayım.

Aşağıdaki Link'ten Exemod'u İndir.
http://www.delphiturk.com/DownloadFile. ... exemod.zip

Ve Projen'e İndirdiğin Zip'teki Exemod.pas'ı Ekle Ve Uses'e Exemod'u Yaz, Böyle;
Resim

Proje Link : http://www.hemenpaylas.com/download/574 ... d.rar.html
Kullanıcı avatarı
AliErdem
Üye
Mesajlar: 157
Kayıt: 16 Nis 2006 02:57

Mesaj gönderen AliErdem »

ernesto1968 arkadaşım const ta tanımla diyosun ama oraya ilk değer ataması yapılması lazım boylede {$j+} eklesem program her başladığında ilk değeri kullanıyor biraz anlatırmısın demek istediğini nereye yazacaz tam olarak ben tüm formlar kullanabilecek şekilde bi değişken tanımlarım

var
x:real;
{$j+}

böyle yaptım hatırlamıyor bunu
Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

Mesaj gönderen nitro »

hayır o zaman da program her başladığı zaman eski değerine döner. exede değişken bişey kullanamazsın. yani exe kapandığı zaman tüm değişkenler değerini yitirir. veritabanı kullan, ya da bi txt dosyaya değeri kaydet. program tekrar çalıştırıldığı zaman txtden değeri alsın.
Kullanıcı avatarı
Trial_Cooder
Üye
Mesajlar: 236
Kayıt: 17 Nis 2006 04:44

Mesaj gönderen Trial_Cooder »

Exemod Kesin Çözüm Bir Göz Atın 8)
aLonE CoDeR
Kıdemli Üye
Mesajlar: 1223
Kayıt: 26 Nis 2005 04:08

Mesaj gönderen aLonE CoDeR »

Trial_Cooder yazdı:Exemod Kesin Çözüm Bir Göz Atın 8)
Senin fikrin de, sabah kalkınca bir bardak süt içmek için evde (afedersiniz..) sığır beslemek gibi bişey :!:
Kullanıcı avatarı
Trial_Cooder
Üye
Mesajlar: 236
Kayıt: 17 Nis 2006 04:44

Mesaj gönderen Trial_Cooder »

bLue aLonE yazdı:
Trial_Cooder yazdı:Exemod Kesin Çözüm Bir Göz Atın 8)
Senin fikrin de, sabah kalkınca bir bardak süt içmek için evde (afedersiniz..) sığır beslemek gibi bişey :!:
:lol: :lol: :lol: Ne Alaka, Madem Anlattın Bide Alakayı Anlat :?
Cevapla