[Delphi] Spusteni a otevreni souboru pres asociaci -Vyreseno

[Lopan]

Potrebuju, aby kdyz asociuju priponu se svym programem a spustim soubor s touto priponou aby se mel otevrel v mem programu pres mou Load(...) fci, jak na to?

[KtK]

to ti jde o to zjistit jaky dostal program parametry z shellu? (Ten dotaz je dost nejasnej.) Pokud ano, podivej se po "ParamCount" a "ParamStr" dost mozna si to pamatuju nepresne az blbe, ale tak nejak to snad bylo..

[Lopan]

Popisu to polopaticteji
Mam treba test.xls, kdyz na neho uzivatel klikne tak se spusti excel a tento soubor otevre, ja potrebuju udelat to same ale u sveho programu.

Na ten ParamCount a ParamStr se podivam

[KtK]

tak to je presne ono. vsak se zavola nejaky prikaz shellu

c:/bla bla /msexcel.exe "soubor.xml"

a ten paramstr a paramcount je neco jako argv[] a argc v C..

[Lopan]

Diky, uz to funguje, ted uz jen dodelat k tomu instalator a jsem hotovy, ma nocni mura, ze to snad nikdy nedodelam se rozplyva

[KtK]

tak sem aspon napis jak je ten kod, ty dve "konstrukce" jsem sem placnul z hlavy a delphi uz jsem nevidel asi rok, takze to asi nebude presne

[Lopan]

Returns a specified parameter from the command-line.

Unit

System

Category

command line utilities

Delphi syntax:

function ParamStr(Index: Integer): string;

C++ syntax:

extern PACKAGE AnsiString __fastcall ParamStr(int Index);

Description

ParamStr returns the parameter from the command line that corresponds to Index, or an empty string if Index is greater than ParamCount. For example, an Index value of 2 returns the second command-line parameter.

On Windows, ParamStr(0) returns the path and file name of the executing program (for example, C:\TEST\MYPROG.EXE).
	On Linux, ParamStr(0) returns the command used to execute the program, without parameters (for example, ./myprogram). This behavior is dependent on information returned by the shell program and may not be consistent among all shells.
Note:	Use double quotes to wrap multiple words as one parameter (such as long file names containing spaces).

Z ParamStr(0) zjistuji, v jakem adresari je umisten program, abych vedel kam ukladat nastaveni apod. No a pak pomoci ParamCount

Returns the number of parameters passed on the command line.

Unit

System

Category

command line utilities

Delphi syntax:

function ParamCount: Integer;

C++ syntax:

extern PACKAGE int __fastcall ParamCount(void);

Description

ParamCount returns the number of parameters passed to the program on the command line. Separate parameters with spaces or tabs. Use double quotes to wrap multiple words as one parameter (such as long file names containing spaces).

zjistuju jestli mam zacit otvirat nejaky soubor, ale lze to zjistovat i pres if (ParamStr(1) <> '') ....