IDE üzerinde kod yazma

[m_ekici]

Merhaba arkadaşlar

IDE üzerinde kod nasıl yazarız? Projeyi derlemeden önce tüm Query lerdeki SQL texlerinin başına ve sonuna /* */ koymak istesek, daha sonra da istediğimizde eklediğimiz bu karakterleri kaldırmayı nasıl yaparız?
tşk.

[fesiharslan]

Merhaba;
Herhangi bir form veya DataModule' üzerinde yer alan bütün Query nesnelerini bir döngü ile tespit edip Sql'ini değiştirebilirsiniz.

Aşağıdaki kod yapısında bulunduğunuz formdaki bütün TFDQuery' ler tespit edilip Sql'lerin başına /* karakterleri, sonunda da */ karakterleri eklenmektedir.

Kod: Tümünü seç

var
  i:integer;
  sqlTmp:String;
begin
  for i := 0 to ComponentCount - 1 do
  begin
    if Components[i] Is TFDQuery then
    begin
      sqlTmp:=TFDQuery(Components[i]).SQL.Text;
      sqlTmp:='/* '+sqlTmp+' */'
      TQuery(Components[i]).SQL.Text:=sqlTmp;
   end;
  end;
end;
 

Silme işini de size bırakıyorum. Aynı yöntemle yapabilirsiniz.
Yöntem olarak; Silme işleminden önce SQL.Text' in ilk İki karakterini kontrol edin. Bu karakterler /* ise; SQL.Text'in baș ve son kısımlarındaki son 3 karakteri silin.
Not: Query'ler DataModule'de ise for döngüsünü üst kısmına With DataModuleAdı do ekleyin.

[m_ekici]

Delphi IDE si üzerindeyken yapmak istiyorum. Programı derlemeden bu kodu çalıştıracağım sonra programı derleyeceğim. ( GEXpert gibi )

[freeman35]

GExpert ve CnWizard kodlarını incele, ama bu baya uğraştırır. OTA (açılımını unuttum şimdi) senin istediğin yani IDE kodlarına ulaşarak IDE nin bir parçası gibi çalışan kod yazmak. Vaktin varsa bence öğrenmek için çok güzel bir konu, ama vaktin yoksa ve kolay çözüm diyorsan fesiharslan ın öneri ve koduna compiler directive ekliyerek bunu yönlendirebilirsin. en basit hali hazırda olan, debug, release i kullanabilirsin yada kendin bir tane tanımlayabilirsin.
GExpert te "Set component properties" diye geçiyor. Ben bunu açık query leri kapatsın diye kullanıyorum. Compile işleminden hemen önce çalışıyor ve projedeki tüm formları kontrol ediyor ve belirtilen classların belirtilen property(leri) belirtilen değerle değiştiriyor.
https://sourceforge.net/p/gexperts/code/HEAD/tree/
bu link official yani resmi olmayan sürümü içeriyor, malum berlin için henüz yayınlanmadı. buradan http://blog.dummzeuch.de/ kurulumu indirebilirsiniz.
CnWizard da ise "Property corrector" diye geçiyor. buda CnPack/CnWizard ın github linki https://github.com/cnpack/cnwizards sourceları inceleyebilmeniz için, hatta ekleme düzenleme yapıp elemanlara bildirebilirsiniz de, itiraz edeceklerini sanmam

Ek: https://sites.google.com/site/yusufcelik/delphiota
arkadaş umarım alınmaz, sormadan linkini ekledim. OTA Open Tools Api nin kısaltması. Hem açıklama hemde basit örnekler var. Yaptıklarınızı paylaşırsanız, güzel olur
Kolay gele

[m_ekici]

tşk ederim.