Delphi içinde kodlarla firebird de tablo oluşturma

[Ademkoysuren]

selam arkadaşlar
delphide kodlarla firebird de database oluşturdum yalnız yine delphi içinde oluşturduğum database e tablo oluşturmam lazım hatta triger ve prosedur oluşturmam gerekli bunu nasıl yaparım.
normalde veri tabanım hazır hazır olan veri tabanı delphide oluşturacağım
ilginize teşekkürler iyi çalışmalar

[Uğur1982]

viewtopic.php?t=106&highlight=create+database+interbase

[Ademkoysuren]

verdiğiniz kod için teşekkür ederim benim bu konu hakkında bir sorum daha olacak
ben ibexprert kullanıyorum orda oluşturduğum tablelin DDL sine girdiğimde yaptığım tüm işlemleri görüyorum bunun içindeki kodları kopyalayıp tekrar başka bir database de çalıştırdığımda çok kolay bir şekilde oluşuyor. delphide de böyle bir çalıştırma imkanın varmı tet tek uğraşmak yerine

[Uğur1982]

merhaba...
viewtopic.php?t=9818

IBScript bileşenini kullanarak yapabilirsin..Yalnız IBX update'li olması lazım...

iyi günler...

[Ademkoysuren]

teşekkür ederim uğur kardeş istediğiminde üstünde şeyler bunlar çok oluyorum galiba ama birşey daha isteyecem ben txt dosyasına attıklarımı yeni ybir tane database oluşturup onun içine atmak istiorum bunu nasıl yapacam
birde bende ibscript componentti yok harici bir komponentmi yoksa delphide varmı delphi 7 kullanıyorum

[Uğur1982]

merhaba...

IBX bileşenlerini update etmen lazım..Aşağıdaki linkte Borland'ın IBX Sayfası başlığında linki var...
İndirilecek exe ismi : IBXDP708_IBX 7.08 for Delphi 7 w IB 7.1 support.EXE
http://www.delphiturkiye.com/index.php?page=dlinks.htm

Bir önceki mesajımdaki linktede örnekleri var..Deneyerek öğrenebilirsin..

iyi günler...

[Ademkoysuren]

kardeş hepsi tamam yalnız procedure yüklerken"Read of address 000000040 " hatası veriyor neden olabilir

[Uğur1982]

Merhaba...

Görüldüğü gibi okuma hatası var diyor...Ama buna herşey neden olabilir...

Procedure yüklerken derken Stored Procedure' yimi kastediyorsun ?Eğer öyleyse nasıl yüklüyorsun?..

Arasıra bu buna benzer hatalar meydana gelir ama Delphi'yi açıp kapadığın zaman sorun hallolur..

Bunun gibi bir hata olmasın...

[Ademkoysuren]

selam

CREATE TRIGGER ALT_DERS_BILGILERI_AIUD0 FOR ALT_DERS_BILGILERI
ACTIVE AFTER INSERT OR UPDATE OR DELETE POSITION 0
AS
DECLARE VARIABLE SAYI integer;
begin
SELECT COUNT( ALT_DERS_BILGILERI.ANA_DERS_ID ) AS SAYI
FROM ALT_DERS_BILGILERI
WHERE alt_ders_bilgileri.ana_ders_id = new.ana_ders_id
INTO :SAYI;

IF (:SAYI = 0 OR :SAYI IS NULL) THEN
BEGIN
update dersler
set dersler.altders_varmi = 0
WHERE (dersler.id = new.ana_ders_id) or (dersler.id = old.ana_ders_id) ;
END ELSE
BEGIN
update dersler
set dersler.altders_varmi = 1
WHERE (dersler.id = new.ana_ders_id) or (dersler.id = old.ana_ders_id);

END

end


böyle bir trigger ım var bunu
IBExtract1.ExtractObject(eoTrigger,'ALT_DERS_BILGILERI_AIUD0');
IBExtract1.Items.SaveToFile('d:\Trigger1.txt');
ettiğimde txt dosyasına



/* Triggers only will work for SQL triggers */

CREATE TRIGGER "ALT_DERS_BILGILERI_AIUD0" FOR "ALT_DERS_BILGILERI"
ACTIVE
;

COMMIT WORK ;


bunu atıyor neden böyle birşey yapıyor

[Uğur1982]

merhaba..

/* Triggers only will work for SQL triggers */

CREATE TRIGGER "ALT_DERS_BILGILERI_AIUD0" FOR "ALT_DERS_BILGILERI"
ACTIVE
;

COMMIT WORK ;

Sadece yukarıdakini atıyor demişsin..Ben denedim hiç bir sorun yok..Trigger ne ise aynısını atıyor...

Fazla bir özelliği de yok zaten..Başka bir triggerda dene istersen..Ama olmaması lazım..

[Ademkoysuren]

selam
"IBXDP708_IBX 7.08 for Delphi 7 w IB 7.1 support.EXE "
delphiye bu bileşeni yükleyince triggerda yaptığım işlemleri delphi içinde anında yapmıyor refresh edince yapıyor ama bu bileşen yüklü olmayınca anında triggeri aktif hala getiriyor sebebi ne olabilir