clik clik i error =P

Mam male pytanko....
Gdy clikne 2 razy na program to wszystko jest ok =]

Ale

Gdy clikne wiecej razy wystepuje jakis error =P
Pewnie chodzi o to ze program sie uruchamia (po 2 cliknieciach) , a potem uruchamia sie jeszcze raz i to powoduje error =P

Jak mozna temu zapobiec?????

Tak, jest to spowodowane tym, że program uruchamia się drugi raz. Najprawdopodobniej masz w programie jakieś funkcje, które nie mogę działać jednocześnie w dwóch programach na raz.

Aby to rozwiązać proponuję skorzystać z komponentu JustOne. Ma on zdażenie, w którym wpisujesz co ma sie dziać po uruchomieniu drugiej kopii oraz booleanowską wlasciwość, w której możesz ustawić czy przy próbie uruchomienia drugiej kopii programu stara ma stać się widoczna.

Komponent powinien być na 4programmers.net, lub na torry.net

Albo wpisz taki kodzik ktory zablokuje ponowne uruchomienie programu:

var
hM : HDC;
begin
hM:=CreateFileMapping(THANDLE($FFFFFFFF),nil,
PAGE_READONLY,0,32,'ApplicationTestMap');

if GetLastError=ERROR_ALREADY_EXISTS then
begin
ShowMessage('Nie można uruchomić tego samego programu');
Application.Terminate;
CloseHandle(hM);
end;

a gdzie wpsiac kod??

w Form.Create ?
w Form.Show ??
w Form.DblClick ??