, lynkursus om, hvordan de skal sende et budskab til alle former for sædvane vinduer i en ansøgning, det lyder som om, det bør være en forholdsvis enkel opgave.desværre er den dokumentation i delphi mangler på dette område. for at indlede denne tutorielle skabe et nyt projekt i delphi, og der tilsættes 2 nye former.redde alle filer og anvende den misligholdelse, navne på form1, form2, form3. vi er nu klar:), der er et par nemme skridt til følge.fastlægge besked konstanter, definere budskab, der håndterer, sende besked til alle former, definere besked konstanter, det er nemt, bare tilføje angivelsen i bruger del af form1 som følger:, konstant,    jr_1 = wm_user + 1, wm_user er vinduerne defineret område af wm værdier, som de har tilladelse til at anvende.når vi skaber skik beskeder altid starter i wm_user + x..., værdier for at undgå er wm_user + 100, 500, 1 000 osv. for del forfattere har en tendens til at bruge disse fælles værdier til egne formål, definere besked kontanthåndterende virksomheder, for at gøre det klarere og reducere kode, jeg har skabt en form for klasse, at alle former for dette eksempel vil være baseret på:, tilføje denne kode, til anvendelsesformål, afsnit under denne erklæring tilføjet., type,    tmessageform = klasse (tform),    beskyttet,      procedure jr1 (var budskab: tmessage); meddelelse jr_1;,   ; nu tilføje følgende kode for gennemførelsen (- punkt. tmessageform.jr1}, procedure tmessageform. jr1 (var budskab: tmessage), begynder,    forklaring: = besked modtaget;,;, okay, så nu har vi enformular klasse, der kan reagere på vores skik besked.det eneste vi skal gøre er at ændre alle former for at være fremstillet af tmessageform i stedet for tform, som så:,,, tform1 = klasse (tmessageform);, er du nødt til at tilføje "enhed1 til din bruger klausul i enhed 2 & 3 -., bruger windows, beskeder, sysutils, klasser, grafik, kontrol, formularer, dialoger, enhed1;, vil du også nødt til at gøre alle former for synlige ved start.det gør vi ved at redigere projekter. dpr fil.dette kan gøres ved at åbne i sagsakterne i blok, eller ved hjælp af projektlederen, at åbne projektleder tryk ctrl + alat + f11, derefter vælge højre klik projektet navn og udvælge, kilde, pasta følgende kode:, anvendelse,    former,    vinduer,    enhed1 i "enhed1. - (form1},,    unit2 i unit2. - (form2},,    unit3 i unit3. - (form3}, {$r *. res}, begynder,    anvendelse. påbegynd;,    anvendelse. createform (tform1, form1),    anvendelse. createform (tform2, form2),    showwindow (form2.handle, sw_show),    anvendelse. createform (tform3, form3),    showwindow (form3.handle, sw_show),    anvendelse. løb,,., tilføjede vi vinduer til anvender afsnit, fordi vi er nødt til at ringe til showwindow.showwindow, gør præcis, hvad det siger om tin) viser en form af dens klare. nu er vi klar til at sende meddelelser til alle de former for anvendelse, sende besked til alle former, tilføje en knap til form1 og branchen klik., pasta, {- tform1.button1click denne kode. den procedure, tform1. button1click (afsender: tobject), var jeg: heltal, begynder, for jeg   : = 0 til screen.formcount - 1,      skærm. form [i]. udføre (jr_1,0,0);,;, løb nu anvendelse og det hele.), hvis de har problemer efter denne artikel, så du kan downloade hele kildekode her.