Yorumları: 43
Konuları: 14
Kayıt Tarihi: 18-10-2019
Aktif Kullandığınız Delphi Sürümü:
Rep Puanı: 64
Başlangıç
22-08-2023, Saat: 18:00
(Son Düzenleme: 22-08-2023, Saat: 18:02, Düzenleyen: YILDIRIMBEY.)
Merhaba arkadaşlar,
Compiler Directive yapısı ile değişken kod yazmak istiyorum,
birden çok uygulama (exe) de kullanmak istediğim ortak formlarım var, (Örneğin ERP ve ERP yönetim uygulamaları)
directive lerin unit bazlı olması yani global olmaması nedeniyle işin içinden çıkamıyorum,
en son şöyle bir mantık kurmak istedim,
{$IF uygulamaadi='ERP' }
erpye özgü kodlar
{$ENDIF}
{$IF uygulamaadi='ERPSYS' }
yönetime özgü kodlar
{$ENDIF}
uses içerisinde ve her türlü kod arasında bu yapıyı kullanmam lazım, aklıma gelen tek yöntem bu şekilde yapmak oldu ama delphi exename i alamıyor yada işleyemiyorum,
yol gösterebilir misiniz.
There is no place like "127.0.0.1"
"Vatanını en çok seven, görevini en iyi yapandır."
Yorumları: 1.823
Konuları: 21
Kayıt Tarihi: 05-08-2016
Aktif Kullandığınız Delphi Sürümü:
Rep Puanı: 20.453
Üstad
Önerim, sınıf yapısı ile kod çeşitliliği sağlamak yönündedir.
Avantajları
1. ortak fonksiyon/procedure kullandırabilirsiniz
( web çağrı, string fonksiyon, db fonksiyon vb. ortak olabilir)
2. Yönetim için bağımsız fonksiyon /proc yazabilir bunlar içerisinden ortak veya lazım oldukça istemci fonksiyon /procedure kullanabilirsiniz
3 Client için bağımsız fonksiyon / procedure yazabilir, ortak veya server procedure / function kullandırabilirsiniz.
Create zamanı (construction) exenin ne olduğuna bakıp sınıfı farklılaştırabilirsiniz.
Saygılarımla
Muharrem ARMAN
Yorumları: 43
Konuları: 14
Kayıt Tarihi: 18-10-2019
Aktif Kullandığınız Delphi Sürümü:
Rep Puanı: 64
Başlangıç
(22-08-2023, Saat: 22:45)mrmarman Adlı Kullanıcıdan Alıntı: Önerim, sınıf yapısı ile kod çeşitliliği sağlamak yönündedir.
Avantajları
1. ortak fonksiyon/procedure kullandırabilirsiniz
( web çağrı, string fonksiyon, db fonksiyon vb. ortak olabilir)
2. Yönetim için bağımsız fonksiyon /proc yazabilir bunlar içerisinden ortak veya lazım oldukça istemci fonksiyon /procedure kullanabilirsiniz
3 Client için bağımsız fonksiyon / procedure yazabilir, ortak veya server procedure / function kullandırabilirsiniz.
Create zamanı (construction) exenin ne olduğuna bakıp sınıfı farklılaştırabilirsiniz.
Cevabınız için teşekkür ederim,
bilgiye erişim noktasında uğraştırıcı da olsa, çözüm gayet basit idi,
Project -> Options -> Building -> Delphi Complier -> Conditional defines bölümüne kullandığım her bir exe ye özel tanım ekledim,
daha sonra bu tanımları her prosedür veya uses bölümünü kapsayacak şekilde eklediğimde, projeye özel kod ve uses alanlarım oluşmuş oldu.
kullanmak isteyen arkadaşlar olursa bilgilerine sunarım.
There is no place like "127.0.0.1"
"Vatanını en çok seven, görevini en iyi yapandır."
Yorumları: 43
Konuları: 14
Kayıt Tarihi: 18-10-2019
Aktif Kullandığınız Delphi Sürümü:
Rep Puanı: 64
Başlangıç
@
mrmarman Teşekkürler hocam, değişiklikleri "All Configurations" olarak yapmıştım zaten
There is no place like "127.0.0.1"
"Vatanını en çok seven, görevini en iyi yapandır."
Yorumları: 1.823
Konuları: 21
Kayıt Tarihi: 05-08-2016
Aktif Kullandığınız Delphi Sürümü:
Rep Puanı: 20.453
Üstad
Mesajımı okumamış ön yargılı yazmışsınız. Sizi üzdüysem kusura bakmayın.
Sadece verdiğiniz örnekte çalışır çalışmaz demek istemedim.
Verdiğiniz örnek içerisinde conditional if/else/end ile normal if / then arasındaki olan farkını bu başlığı okuyanlar için açıklayıcı bulmadığımı ifade ettim.
Onun için vakit ayırıp daha genel bir örnek ile tamamlamayı istedim.
Bu sayede daha ileri bir düzeyde cevap yazma ihtiyacı duydunuz bu da haklı olduğumu gösteriyor sanki... Üzdüğüm için tekrar özür dilerim.
Saygılarımla
Muharrem ARMAN