programmeringssystem /næste (tidligere) i mdi redaktører

, "hvordan" programmere systemet menu i mdi barn vinduer, et mdi tekst redaktør eller textwriter ændre næste og tidligere, fra z-stack løbende til nyttige skriftligt /redigering opgaver, programmeringssystem /næste (tidligere) i mdi redaktører,,,,, som gene fowler, acorioso @ earthlink. netto,,,, at skrive udvidet notesblocks er almindelig praksis, og de nye blok, er næsten altid en mdi anvendelse.textedit er en "prøve" eller "demo", der har været i alle delphi - pakken.jeg har skrevet det til min egen udvidet blok, som startede i textedit tilbage i 1997, så, jeg behøvede ikke engang at ændre navne for dig at sætte den kode, i textedit kilde, samle og løbe din test.,,, mdi barns system menu næste har været uændret siden gang, altid.det er en programmør "test" af z-stack af åbne vinduer (udgivere, og i vores tilfælde).en række sager eller redaktører.,, bliver ved med at ramme system /næste eller ctrl + f6, og du bliver ved med, at toppen, kort på bunden af stakken.brug (skjulte) system /tidligere, på skift + ctrl + f6 og lav en omvendt løber ved at bunden, kort til toppen.nyttige i alfa - test.det er ikke hensigtsmæssigt i en redaktør.efter at hoppe af vinduer i en tid, z-stack nej, længere afspejler den belastning (eller - vindue), for - og det har de, en slags tilfældig vindue adgang.,,, hvad der ville være nyttige for en forfatter eller redaktør, ville være at holde, vi udveksler de to vinduer, og efter at springe til en anden vindue, eller om en ny, til at vende tilbage til dem og gå ud.,, kode under gennemfører dette.system /næste eller ctrl + f6 vil gøre, er, at ved at bringe den næste top til top.det sidste, to holdninger er husket efter hver brug af næste og, hvis holdninger, flyttes, skift + ctrl + f6 vil genoprette de to til deres holdninger efter de sidste system /næste eller ctrl + f6.det vil arbejde på 32 - bit - tal delphi.,,, hvis du er udarbejdelsen af textedit i delphi 5.0 eller (efter anvendelse, ajourføre pakning) 5.01, vil du have et ustabilt textedit - her til.enhver mdi - program, som textedit ved hjælp af fusionerede menuer, op og lås, når du skifter overtrukket vinduer.i delphi - 1, 4, gennem en mindre alvorlig følge fandt sted.[x] knap, den nye top redaktør ville være grayed, men funktionelt.det var, fordi ingen "genskabe...maksimere "grupperet kontakten.det var, skal have en eftertanke i kraft den menu til brugbar, stat.i 5, "at tvinge koden" blev fjernet.men ingen klassificering, blev indsat.den samlede styrt.løsninger til d4 problem, dukkede op i delphi - liste (ikke borland).en af disse, er løsninger, der vil løse d5 problem.denne url vil tage dig til punkt 0372 i delphi - liste:,,http: //www.jrsoftware. org /buglist /, der genereres /entry0372. htm, kopi greg chapman 's procedure (tcustomform. mergemenu) i en fil,, og gem den.en kopi af forms.pas og erstatte det, procedure i forms.pas med chapman. læg den ændrede former. pas, i textedit projekt fortegnelse og gøre en bygge på textedit.,, jeg har læst, at der vcl kilde ikke altid passer, dcu, men det ser ikke ud til at medføre nogen problemer her.men det er en god idé, at begrænse den ændrede enhed til individuelle mdi projekt, kataloger og ikke anvende det generelt som en ny forms.pas på din vej, bibliotek.,,, kode nedenfor, er en besked kontakt til sted i mdiedit. pas, og to svar rutiner til mdiframe.pas.erklæringerne er her.,,,,,,,,, (kode: dette budskab kontaktperson er i mdiedit.pas enhed af, borland demo textedit anvendes som et forsøg for dette projekt.,,,,,, teditform = klasse (tform),,,,,,,,, private,,,,,,,, procedure wmsyscommand (var - mng: twmsyscommand), en besked, wm_syscommand;,,,,,,,,,, procedure teditform. wmsyscommand (var - mng: twmsyscommand), begynder, sag msg.cmdtype af, sc_nextwindow:,, begynder, frameform. getnext,,,,,,,, begynder sc_prevwindow:,, frameform. getprev,,,,,, andre har arvet,,,,,,,,,, (disse to serier er i mdiframe.pas enhed af, borland demo textedit anvendessom et forsøg for dette projekt.,,,,,,,,,, tframeform = klasse (tform),,,,,,,,,,, getnext procedure; proceduren getprev;,,,,,,,,,, var,,,,,,,,, ismaxed: boolean,,, f6one: string,,, f6two: string.,, gennemførelse,,, procedure tframeform. getnext;, begynder, hvis mdichildcount < 2, begynder, messagebeep (0), udgang,,,,,, lockwindowupdate (klare);,, f6one: = activemdichild. legende,,, hvis activemdichild.windowstate = wsmaximized så,, begynder, ismaxed: = sandt,,, activemdichild.windowstate: = wsnormal,,,,,, mdichildren [1]. bringtofront;,, hvis ismaxed så, begynder, ismaxed: = falske,, activemdichild.windowstate: = wsmaximized,,,,,, f6two: = activemdichild. legende,,, lockwindowupdate (0),,,,,,, procedure tframeform. getprev;,, var, jeg: heltal, begynder, hvis mdichildcount < 2, begynder, messagebeep (0), udgang,,,,,, lockwindowupdate (klare), hvis activemdichild.windowstate = wsmaximized så, begynder, ismaxed: = sandt,,, activemdichild.windowstate: = wsnormal,,,,,, jeg: = 0 til mdichildcount - 1, hvis mdichildren [i]. legende = f6one så, mdichildren [i]. bringtofront;,, for jeg: = 0 til mdichildcount - 1, hvis mdichildren [i]. legende = f6two så, mdichildren [i]. bringtofront;,, hvis ismaxed så, begynder, ismaxed: = falske,, activemdichild.windowstate: = wsmaximized;,,,,, lockwindowupdate (0),,,,,,,,,, sammenflettede bibliografi, begyndte jeg improviserer disse artikler om at gøre nogle af de ting, jeg gør, i ewriter i delphi - demo textedit (som jeg byggede ewriter). det er naturligt, at samle alle disse i en kopi af textedit.og du bliver nødt til at gå frem og tilbage til at fylde nye, ikke - eller ændrede støtte rutiner.pakket sedler synes de fleste steder.tal, er det igangværende "forretning" samtale...,, programmeringssystem /næste (tidligere) i mdi redaktører,,,http://www.howtodothings.com/showarticle.asp?artikel = 143,,,,,,,,,, selektiv flisearbejde i mdi redaktører,,,http://www.howtodothings.com/showarticle.asp?artikel = 147,,,,,,,, - vindue numre i mdi redaktører,,,http://www.howtodothings.com/showarticle.asp?artikel = 154,,,,,,, punkt ", at" fra en tekst, redaktør,,,http://www.howtodothings.com/showarticle.asp?artikel = 178,,,,,,,,



Previous:
Next Page: