örnek vererek soyle sorayım :
soran.exe diyorki
winexec(pchar('kontroledenexe.exe parametre1'),sw_normal);
dedik fakat "kontoledenexe.exe" den geri dönen bilgiyi nasıl alabilirim
yada buna benzer nasıl bir mantık kurulabilir
not iki uygulamada delphi project
baska uygulamadan donen sonucu almak?
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Re: baska uygulamadan donen sonucu almak?
S.A
exeden dönen veri nasıl bişey olacak ve tam olarak amacın nedir biraz daha açarsan daha detaylı yardımcı olabilirim.
Akılama gelen bazı yöntemler gelen veriyi bi txt dosyaya yazabilir ana programdan da okutabilirsin. Eğer yazdıracağın veriler düzenli veriler ise xml e yazdırabilirsin okuması daha düzgün olur. Direk olarak geri değer dönderebilirmisin exe ile tam bimiyorum ama bu yöntemlede işini görürsün sanırım.
Kolay gelsin.
exeden dönen veri nasıl bişey olacak ve tam olarak amacın nedir biraz daha açarsan daha detaylı yardımcı olabilirim.
Akılama gelen bazı yöntemler gelen veriyi bi txt dosyaya yazabilir ana programdan da okutabilirsin. Eğer yazdıracağın veriler düzenli veriler ise xml e yazdırabilirsin okuması daha düzgün olur. Direk olarak geri değer dönderebilirmisin exe ile tam bimiyorum ama bu yöntemlede işini görürsün sanırım.
Kolay gelsin.
Re: baska uygulamadan donen sonucu almak?
o zaman sole diyeyim geri donecek veri soyle
var veri:Array[0..10] of Variant;
txt yada xml dosya kullanmadan memory nin bir kısmına yazıp erişemeyizmi
var veri:Array[0..10] of Variant;
txt yada xml dosya kullanmadan memory nin bir kısmına yazıp erişemeyizmi
Re: baska uygulamadan donen sonucu almak?
memory alan için memory stream araştır bi sıralı dizeler işini görebilir.
UWESIS CORPORATION
Re: baska uygulamadan donen sonucu almak?
gelen verinin tipine göre int char vs. bir değişkene eşitleyebilrisin
örneğin "soran.exe" den dönen sonuç 1 ise
int a;
a=winexec(pchar('soran.exe'),sw_normal);
yazdığında soran.exe nin döndüğü 1 değerini a değişkenine atamış oluruz bunu da istediğin gibi kullanırsın
kolay gelsin
örneğin "soran.exe" den dönen sonuç 1 ise
int a;
a=winexec(pchar('soran.exe'),sw_normal);
yazdığında soran.exe nin döndüğü 1 değerini a değişkenine atamış oluruz bunu da istediğin gibi kullanırsın
kolay gelsin
Re: baska uygulamadan donen sonucu almak?
Başka bir uygulamaya herhangi bir değer göndermek için(Notepad'e gönderiyorum) :
Ancak aynı anda 2 projeninde açık olması gerekir..
Kolay gelsin..
Kod: Tümünü seç
procedure TForm1.Button1Click(Sender: TObject);
var
g,d:integer;
begin
{uygulamanın ana penceresini bul}
g:=FindWindow('Notepad',nil);
{uygulama penceresindeki text box'ı bul}
d:=ChildWindowFromPoint(g,point(50,50));
{karakteri gönder}
SendMessage(d,WM_CHAR,Ord('A'),0);
end;
Kolay gelsin..
Batuhan TAŞDÖVEN
'Yükseldikçe küçülen bir uçurtma..'
'Yükseldikçe küçülen bir uçurtma..'