Տուն
Top.Mail.Ru Moscow
Ֆորում: «Գլխավոր»;
Ընթացիկ արխիվը `2004.12.12;
Բեռնել: [xml.tar.bz2];

Down

Կրկին դիմումի երկրորդ պատճենի մասին ... Գտնել նմանատիպ մասնաճյուղեր


RDen   (2004-12-01 10:55) [0]

Բարեւ Ես թույլ չեմ տա իմ դիմումի երկրորդ օրինակը այսպես ասած:
DPR- ում
....
եթե FindWindow ("TForm1", "Բնակչության տվյալները") <> 0 ապա
սկսեք
SetForegroundWindow (FindWindow ("TForm1", "Բնակչության տվյալներ"));
Դիմում.
Ելք.
վերջ
....

բայց աշխատանքի ընթացքում ձեւի տառատեսակը փոխվում է, եւ հետո հնարավոր է դառնում երկրորդ ատյանի գործը: Ինչպես խուսափել այն:
Շնորհակալություն:



Alexander Panov ©   (2004-12-01 11:00) [1]

Օգտագործեք mutexes:
Պատասխանները գտնվում են ՀՏՀ-ում, լրիվ ինտերնետում:

Ահա նման գործառույթի օրինակ.

գործառույթը վերածվում է (aUniqueString: String): Boolean; var hMutex: THandle; սկսեք Արդյունք `= կեղծ; hMutex: = CreateMutex (nil, False, PChar (aUniqueString)); եթե GetLastError = ERROR_ALREADY_EXISTS ապա սկսեք Արդյունք `= True; CloseHandle (hMutex); վերջ վերջ



TUser ©   (2004-12-01 11:01) [2]


> Ինչպես խուսափել այն:

Օգտագործեք mutexes, օրինակ: Դուք կարող եք նաեւ մտածել FW- ի միջոցով, օրինակ, Caption- ը փոխելով եւ գրել այն ինչ-որ տեղ ռեեստրում: Այնուհետեւ դուք կգտնեք պատուհանը ճիշտ անունով: Դուք կարող եք խորհուրդ տալ փոխել դասը TMainaUnikalnaGlavnaForma1- ը կփրկի:



Думкин ©   (2004-12-01 11:18) [3]

aUniqueString - GUID օգտագործելու համար: :(



Alexander Panov ©   (2004-12-01 11:36) [4]

Դումկին © (01.12.04 11: 18) [3]
aUniqueString - GUID օգտագործելու համար: :(


Ինչու?
Դա շատ հավանական է, օրինակ, եզակի բանալին, եթե նշված է UniqueStr ձեւով: = Application.Title + IntToStr (Application.FormMain.Handle),
որոշ հայտեր կօգտագործվեն:



Думкин ©   (2004-12-01 12:24) [5]

> [4] Ալեքսանդր Պանով © (01.12.04 11: 36)

Մալան փոքր չէ: Ցավում եք GUID- ի համար: :)
Սեղմեք Ctrl-Shift-G- ը շատ ավելի հեշտ է եւ արագ:



RDen   (2004-12-01 12:33) [6]

Շնորհակալություն շատ, շատ օգտակար!



Էջեր: 1 ամբողջ ճյուղը

Ֆորում: «Գլխավոր»;
Ընթացիկ արխիվը `2004.12.12;
Բեռնել: [xml.tar.bz2];

Up









Հիշողություն `0.57 ՄԲ
Ժամանակը `0.095 գ
14-1100768556
IMHO
2004-11-18 12:02
2004.12.12
Ուղեղների արտահոսքի


14-1100843607
Mike kouzmine
2004-11-19 08:53
2004.12.12
Ֆորումում կա Nokia 7610 սեփականատեր:


3-1100507302
Մահվան
2004-11-15 11:28
2004.12.12
DBGrid. Ցուցադրել տվյալները դաշտերում


4-1099146087
IronRat
2004-10-30 18:21
2004.12.12
Filemapping


1-1101804989
Սերգեյ Էվոկիմիմով
2004-11-30 11:56
2004.12.12
Ծրագրային ընտրեք ShellTreeView- ի թղթապանակը:





afrikaans ալբանական արաբական հայերեն ադրբեջանական Բասկերի Բելառուսի Բուլղարիայի catalan Չինարեն (պարզեցված) Չինարեն (ավանդական) Խորվաթիայի չեխ դանիերեն հոլանդական Անգլերեն
Էստոնիայի filipino ֆիններեն ֆրանսերեն
galician վրացական գերմանական հունարեն haitian Creole եբրայերեն հինդի հունգարերեն icelandic հայերեն իռլանդական իտալական ճապոնացի Կորեայի Լատվիայի Լիտվայի մակեդոներեն Մալայերեն մալթերեն նորվեգական
պարսկական Լեհաստանի պորտուգալացի ռումինական ռուսական սերբերեն Սլովակիայի Սլովենիայի իսպաներեն սուահիլի շվեդերեն թայերեն թուրքական ուկրաինական ուրդու վիետնամերեն ուելսերեն հայերեն bengali բոսնիերեն
Cebuano Esperanto գուջարաթի հաուսա Hmong Igbo ճավաերեն kannada Khmer Lao լատիներեն մաորի մարաթի մոնղոլական նեպալերեն Punjabi Somali tamil telugu յորուբա
զուլուսերեն
Անգլերեն Французский Немецкий Итальянский Португальский Русский Испанский