ParamStr(ParamCount) Delphi
Potrebuji nakopnout, mam toto
TSynEdit(PageControl1.ActivePage.Controls[0]) .Lines.LoadFromFile(soubor); kde promenna soubor je declarovana jako string, pri asociaci souboru treba index.html se pri prvnim spusteni soubor nacte a vlozi do komponenty to je OK, ale pri opetovnem vyhledani dalsiho souboru se uz nic neprovede a zustane tam jen ten co jsem jiz nacetl, proceduru ktera vytvari komponentu za behu jsem zkousel dat primo do project.dpr jako Form1.vytvor(ParamStr(ParamCount));, pri pokusu o vlozeni dalsiho souboru dojde k chybe v programu. Jak docilit aby se FCE ParamStr() vynulovala ?? Napadlo mne pouzit knihovnu *.dll ale jeste jsem to nezkusil zda to vubec pomuze.
A proc by se ta funkce mela nulovat ? Jednak ParamStr(0) vraci vzdy cestu k aplikace a druhak po celou dobu programu udrzuje seznam a pocet predanych parametru.
Budes to muset resit jinak - napr. pri startu programu v cyklu 1 to ParamCount vytvorit zalozky a otevrit soubory. Do funkce, ktera otevira soubor uz predavej konkretni jmeno souboru, ne vzdy posledni parametr.
Jenze ja to potrebuji ne nacitat nekolik souboru naraz ale jakyoliv na ktery kliknu i pri spustene aplikaci s jiz nactenym souborem.
Pak to musis delat jinak.
Pokud kliknes na soubor a aplikace je jiz spustena, Windows spusti dalsi instanci aplikace. Ty si musis zjistit, ze jedna instance jiz bezi a nejakym zpusobem ji musis predat jmeno souboru - napr. pomoci zpravy WM_COPYDATA
Stahni si knihovnu JCL:
http://sourceforge.net/project/showfiles.php?group_ id=47514
V unite JclAppInst mas v podstate vse vyreseno, vcetne posilani souboru jine insanci.
Aha tkaze pres paramstr jen pouze pri formcreate a pak uz jinak, diky moc vyskousim.
Pres ParamStr() to dostanes ne pri FormCreate, ale pri spusteni programu s parametrem. To same dostanes i v dalsich instancich tveho programu, ktere e spusti kliknutim na soubor.
Tak jsem prosel google stahnul i JCL componenty, prohledl dema ale nak mi nedochazi jak stoho ten soubor dostat, proste nevim jak na to. WM_COPYDATA mi vraci definovanou hodnotu (74) typu integer ktera se nemeni, predani dat z aplikace do aplikace by bylo v pohode ale z nic do aplikace ?? Na to jsem kratkej
Problem vyresen, componentu jsem nakonec nepouzil ale misto toho jsem se malinko zameril na
TCopyDataStruct,TWMCopyData a WM_COPYDATA uz to pracuje jak ma jeste jednou dik.
Diky projeti jeste jednou google jsem nasel mnoho zpusobu jak toto pouzit, Delphi ten nastroj maji aniz by componenta byla treba
JCL nejsou komponenty, jsou to pouze knihovny
WM_COPYDATA je normalni zprava Windows, takze nepotrebujes nic jineho, nez pridat Messages do USES
http://www.delphidabbler.com/articles?article=13&p art=1
Proc vytahujes 4 roky stary thread?