baska uygulamadan donen sonucu almak?

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
metemete
Üye
Mesajlar: 422
Kayıt: 21 Mar 2004 12:30
Konum: samsun
İletişim:

baska uygulamadan donen sonucu almak?

Mesaj gönderen metemete »

ö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
seho
Üye
Mesajlar: 51
Kayıt: 01 Nis 2008 12:40

Re: baska uygulamadan donen sonucu almak?

Mesaj gönderen seho »

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.
Kullanıcı avatarı
metemete
Üye
Mesajlar: 422
Kayıt: 21 Mar 2004 12:30
Konum: samsun
İletişim:

Re: baska uygulamadan donen sonucu almak?

Mesaj gönderen metemete »

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
Kullanıcı avatarı
CiTiZEN
Üye
Mesajlar: 1163
Kayıt: 06 Oca 2008 04:15

Re: baska uygulamadan donen sonucu almak?

Mesaj gönderen CiTiZEN »

memory alan için memory stream araştır bi sıralı dizeler işini görebilir.
UWESIS CORPORATION
mehmet987
Üye
Mesajlar: 10
Kayıt: 09 May 2009 09:42

Re: baska uygulamadan donen sonucu almak?

Mesaj gönderen mehmet987 »

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
qamyoncu
Üye
Mesajlar: 266
Kayıt: 12 Tem 2008 04:30

Re: baska uygulamadan donen sonucu almak?

Mesaj gönderen qamyoncu »

Başka bir uygulamaya herhangi bir değer göndermek için(Notepad'e gönderiyorum) :

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;
Ancak aynı anda 2 projeninde açık olması gerekir..
Kolay gelsin..
Batuhan TAŞDÖVEN
'Yükseldikçe küçülen bir uçurtma..'
Cevapla