Tüm Platformlar için Hızlı Uygulama Geliştirme --->    Kitabımız...      Delphi

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 3/5 - 1 oy
  • 1
  • 2
  • 3
  • 4
  • 5
winexec ile program açınca sorun oluyor.
#1
Merhaba arkadaşlar.

Programımı elle çalıştırdığımda sorun yok ama,

winexec(pchar(prodizini+'program.exe'),1);

Olarak başka program'dan çalıştırınca dosya okuma vs sorun oluyor neden kaynaklanıyor?

Sorunun ne olduğunu buldum ama çözümünü bulamadım bir türlü.

if fileexists('ayarlar.txt') then begin
showmessage('var.');
end;

Alttaki kod exe'de çalışıyor sorunsuz ama ben DLL'de yapmak istiyorum DLL de aynı sorun oluyor.

uses ShellApi;
var parameter: String;

parameter:='param1 param2';
ShellExecute(0, 'open', 'program.exe', PChar(parameter), nil, SW_SHOW);


Mesela normal elle açınca ayarlar.txt adlı dosya var diyor ama winexec ile açınca yok gözüküyor nasıl çözücez?

Yardımcı olursanız sevinirim.

Arkadaşlar yeni proje yaptım içine ekledim kod elle çift tıklayıp açınca çalışıyor ama winexec programla açınca gene çalışmıyor.

Benim projemle alakalı olabilir diye düşündüm ama değilmiş.
Cevapla
#2
Selam,
Büyük ihtimalle dosya yolundan kaynaklı, exe nin olduğu klasörde arıyor dosyayı fakat farklı exe farklı klasörde olunca dosyayı göremiyor olabilir. Dosya yolunu tam olarak yazarsanız bir sorun kalmaz diye düşünüyorum.
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
WWW
Cevapla
#3
İkisi de aynı klasör de.
Cevapla
#4
ShellExecute ile denesen ?
ShellExecute(Handle, 'open', 'net','start Mysql5', nil, SW_HIDE);  
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla
#5
(10-01-2017, Saat: 11:37)Shou Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Olİkisi de aynı klasör de.

İkisi de aynı klasörde ama siz WinExec ile çalıştırınca muhtemelen başlangıç dizini olarak gördüğü yerde diğer dosyayı arıyor. esistem'in dediğini deneyin, sorun çözülürse/çözülmezse ona göre konuşalım bence  Wink
Cevapla
#6
ShellExecute(Handle, 'open', 'program.exe','start Mysql5', nil, SW_HIDE);

[Error] program.dpr(1089): Undeclared identifier: 'Handle'
hatası veriyor nerede yanlış yapıyorum?
Cevapla
#7
(10-01-2017, Saat: 17:41)Shou Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
ShellExecute(Handle, 'open', 'program.exe','start Mysql5', nil, SW_HIDE);

[Error] program.dpr(1089): Undeclared identifier: 'Handle'
hatası veriyor nerede yanlış yapıyorum?

uses Vcl.Controls;

bu olmayabilir mi uses'ta ?
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Kuvvete dayanamayan adalet aciz, 
Adalete dayanamayan kuvvet zalimdir.
WWW
Cevapla
#8
Var ama gene aynı hata veriyor?

Ben dll kullanıyorum?
Cevapla
#9
Procexp adlı uygulamayı indir. Uygulamanı çalıştır. Ve bu uygulama ile uygulamanın çalışma klasörü gibi değerleri incele.
Ağlarsa kablosuz ağlar, gerisi yerel ağlar...
Cevapla
#10
Hocam denedim ben başka klasörü okuyor evet ama ben kendi klasörümü nasıl okutabilirim onu çözemedim örnek kod verebilirseniz çok sevinirim.

ertank Adlı Kullanıcıdan Alıntı:GD.EXE uygulamasının OnCreate() olayına esas yapması gerekenleri yapmaya başlamadan önce (mümkünse ilk satır olarak) aşağıdaki satırı ekleyip yeniden deneyebilir misiniz?

Chdir(ExtractFilePath(Application.ExeName));

Sorunum bir diğer forumda @ertank sağolsun yardımcı oldu düzelttik kendisine çok çok teşekkür ederim.
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Program Files Yetki Sorunu narkotik 9 240 18-01-2018, Saat: 17:45
Son Yorum: SimaWB
Question program içerisine veritabansız kayıt BY-HAYALET 6 181 09-12-2017, Saat: 12:23
Son Yorum: Abdullah ILGAZ
  Çalışma anında program kodu yazıp çalıştırmak boreas 9 426 30-10-2017, Saat: 11:17
Son Yorum: engerex
  Görev yöneticisinden program sonlandırma tgural 14 927 13-10-2017, Saat: 22:26
Son Yorum: QuAdR
  Program menü formu için dashboard çalışması Abdullah ILGAZ 4 274 06-10-2017, Saat: 23:05
Son Yorum: pro_imaj



Konuyu Okuyanlar: 1 Ziyaretçi