Delphi ile dos' u çalıştırıp işlem yapma

[denaris]

Arkadaşlar bi bi koda ihtiyacım var delphi ile dos çalışcak ama dos ekranı görünmeyecek sonrasında ise şu komutu calıştırcak "c:\program files\mysql\mysql server 5.0\bin\mysql -uroot -pq1w2e3r4 <"c:\myconnect\hakedis.sql" bu komutu çalıştırmam gerekli bu komut c:\myconnect\hakedis.sql deki hakedis.sql dosyasını mysql e restore edicek.

[Battosai]

zeos kullanıyorsan dos'a falan gerek yok...ZProsesor ile halledersin....

[adelphiforumz]

Yontem 1
uses ExtCtrls;
winexec('d:\x.bat',0);

Yontem 2
uses ShellApi;
function ExecuteFile(const FileName, Params, DefaultDir: string; ShowCmd: Integer): THandle;

Executefile('c:\xxxx.bat','','', Sw_hide);

Yontem3
uses ExtCtrls;
function ExecuteFile(const FileName, Params, DefaultDir: string; ShowCmd: Integer): THandle;

function tform1.ExecuteFile(const FileName, Params, DefaultDir: string;
ShowCmd: Integer): THandle;
var
zFileName, zParams, zDir: array[0..79] of Char;
begin
Result := ShellExecute(Application.MainForm.Handle, nil,
StrPCopy(zFileName, FileName), StrPCopy(zParams, Params),
StrPCopy(zDir, DefaultDir), ShowCmd);
end;

Executefile('c:\calistir.bat','','', Sw_show);

[denaris]

verilen cevaplar için gerçekten teşekkür ederim ilgilendiğiniz için ama zprocessor ile nasıl yaparım.

[Battosai]

memo.loadfromfile('C:\hakedis.sql');
zprocessor.clear
zprocessor.script:=memo.text
zprocessor.execute;

bu şekilde içerisinde birçok ';' ile ayrılmış SQL cümlesini MySQL e gönderebilirsin...

[denaris]

dün o kadar uğraştım ki sormayın bunun için zsqlprocessor' e de baktım ama active run gibi bişi göremeyincede dedim değil valla allah razı olsun sizden çooook teşekkür ediyorum

[denaris]

battosai arkadaşım sana acil ulaşmam gerekli derdimi anlatayım da tam herşey düzgün derken bide baktım restore ettiğim veri tabanının dataları türkçe karakter problemli tabloların charset leri = latin1 Collation ları = latin1_swedish_ci şunu söyleyeyim mysql administrator kullanıyorum backup alırken yine mysql administrator kullanarak restore edersem sıkıntı yok delphide düzgün görünüyor datalar fakat kendi hazırladığım programla restore yaptığımda türkçe karakten problemli. bu problemi nasıl çözümleyebilirim yardımcı olursan çoook sevinirm msn: savasgti@hotmail.com

[Battosai]

ZeosConnection1.Properties'e tıklatıp, açılan pencereye ;
codepage=latin5 yazıyoruz...

[denaris]

usta tekrar tekra sağolasın allah razı olsun senden. Fakat latin5 ile olmadı utf8 yaptım connection un properties ine codepage=utf8 kitap gibi çalışıyor tekrar teşekkür ederim