ShellExecute

Niech mi ktoś powie czemu to nie działa, do chol.....

do zmiennej "a" wczytuję liczbę

a:=edit1.text;
ShellExecute(handle,'open','c:katalog'+'a'+'.jpg', nil,nil,sw_show);

hheeeeeeeelppppppppppp

może ShellExecute(handle,'open','c:katalog'+a+'.jpg', nil,nil,sw_show);[/

Niech mi ktoś powie czemu to nie działa, do chol.....
do zmiennej "a" wczytuję liczbę
a:=edit1.text;
ShellExecute(handle,'open','c:katalog'+'a'+'.jpg', nil,nil,sw_show);

a może

ShellExecute(Handle, 'open', PChar('c:\katalog' + a + '.jpg'), nil, nil, SW_SHOW);