Przesyłanie zmiennych do innego programu

[darkhaker]

Od kilku dni zastanawiam się i szukam jak napisać takie coś np :
Mamy program okienkowy i wpisujemy do niego np w edit imię i klikamy w Ok a on przesyła zmienną imie : string do programu konsolowego też w delphi.
Da się coś takiego zrobić ??

 

[djmentos]

FindWindow + SendMessage

 

[darkhaker]

Ok ma to tak wyglądać ??
:

h := findwindow('{co tutaj ??}','program') // tak ??

// i potem



SendMessage(h,imie, { i co tutaj ??});

a w programie konsolowym ??
kompletnie zielony jestem w tym[/code]

 

[h4x]

zebys mogl wyslac, program zrodlo musi oczekiwac wiadomosc.
potoki sa od tego

 

[djmentos]

ja mam to tak:

  receiverHandle := FindWindow(PChar('Tglowna'),PChar('Web Edit'));

  if receiverHandle <> 0 then

  begin

  SendMessage(receiverHandle, WM_COPYDATA, Integer(Handle), Integer(@copyDataStruct))

 

[darkhaker]

ma to wyglądac tak ??

receiverHandle := FindWindow(PChar('Tglowna'),PChar('Mój program'));//? 

  if receiverHandle <> 0 then 

  begin 

  SendMessage(receiverHandle, imie, Integer(Handle), Integer(@copyDataStruct)) // ??

 

[l4f]

Albo zapisywać zmienną do pliku i w drugim odczytywać.

 

[darkhaker]

hymm... dobry pomysł macie obaj pomógł :
djmentos i
l4f

 

[NoRuless]

Można też uruchomić program z parametrem - np. nazwaprogramu.exe -1 wartoscPierwszejZmiennej -2 wartoscDrugiejZmiennej itd.
Później w drugim programie odczytujesz to za pomocą GetCommandLine -> poczytaj o niej w MSDN http://msdn2.microsoft.com/en-us/library/m...156(VS.85).aspx