tegels MDI bewerken, als alleen de twee dossiers open raam /watt menu is nuttig.Dus, de code om te komen tot een meer nuttige "dak 2 n raam", kan het dossier niet verliezen,,,,,,,,, tegels MDI bewerken, Fowler, "gen, acorioso earthlink. Netto -,,,, op 28 mei 2001, toen ik bij een filter. In het raam van de te volgen, om het aantal in MDI redacteur, voorzien van etiketten, vond ik dat ik niet de waarde, de heropening van het dossier voor het sluiten van de tegels.Ik heb aan het veranderen, tframeform. Tile2ofn1click:,,,, //geleend van de moed open1click in plaats van,, /reopenit in ewriter complexe doorkruisen, en teditform. Het creëren van (zelf), begin,,, open (tiletwo [M]);,, de etikettering: = 3 + M;,,, aan het einde van de vervanging van,,,,,,: ///////geleend van de moed open1click in plaats van,, /reopenit in ewriter complexe doorkruisen, en teditform. Het creëren van (zelf), open (tiletwo [M]);,,,,,,, een aantal aanvullende code, als je zijn voorzien, de ramen van de Top 2 n tegels, in textedit naar de code werkt, wil je dit saveas1click conventionele mdiedit.pas.Misschien is het je opgevallen, als je een nieuwe documenten, het behoud of niet, je hebt een vreemd resultaat.Dit is niet raar worden de resultaten van de bewaring van de documenten (voor het geven van een pad).Je moet niet als je niet gered van de nieuwe dossiers van het menu,.,, de omvang van de verliezen is nooit teruggevonden, en een vreemd effect.En tiling1, effect, ik noem het, 'n raam, boven WA 2.,,, programma' s teditform. Saveas1click (afzender: TObject); savefiledialog.filename:= weg,,,,,,, als de bewaring van de documenten en beginnen met de uitvoering van de dialoog,,,,, de weg van dialoog: = de bewaring van de documenten, in de naam van;,, beschrijving: = extractfilename (weg); en een dossier openen, steek (etikettering, weg); ///////lijst van de nieuwe weg, save1click (afzender);,,,, aan het einde van het,,,,,,,,, een waarschuwing: deze code test is borland textedit demonstratie van Delphi. Bijkomende.Als je 5 of 5.01 opgesteld in Delphi, je zal moeten worden gewijzigd forms.pas, beveel ik je in mijn eerdere artikelen, programmering /(preventief) in MDI bewerken.,,,,,, als je de samenstelling en werking van de textedit borland (DEMO /document /redacteur), klik. Export menu, zult u zien dat de twee documenten in het menu: keramische tegels en gangbare praktijk.Het bevel is een wonder van keramische tegels van het ontwerp.Als je twee dossiers geopend, zijn deze verticale gestapeld.Dit is een zeer nuttig voor de organisatie van het werk.Maar laten we verder gaan.Als je drie dossiers open, ze is nog steeds een verticale gestapeld.Nu, een ieder van hen zijn niet veel werk.Als je vier dossiers, die de klant in het kwadrant.Ik kan niet proberen met vijf dossiers geopend.Ik vrees de pixel - scherm, als je er maar twee dossiers geopend, de tegels zijn zeer nuttig.Echter, in een in het kader van het project, misschien wil je er een half dozijn bij de hand.Wat je nodig hebt is een alle documenten aan de ene kant en met een klik met de muis, dan brengen ze terug, en dan wil je niet bezorgd of de documenten niet op de tegels of is het twee keer klikken.De volgende voor de uitvoering van de in het raam van de menu 's onder een nieuw project.Klik, daken, 2, raam.Alle dossiers die de Top 2 is gesloten, de Top 2 is de tegels.Controleer het menu.Klik op het onderzoek van documenten, worden heropend, en ook de ontploffing, documenten, en een actief bij de heropening van boven.,,, in de tframeform, de menu 's op de tegels en cascade tussen' t raam.In het volgende deel van de code van de top, en ik gaf een titel (voor de gebruiker), en aan de controle van de eigenschappen moet nep zijn.Al het andere kan worden gelaten (want dat was ik aan het onderzoek gedaan.Zoals aangegeven in figuur, de naam eigenschap kan worden verkort.In het geval van tabel, op een onclick worden behandeld.Tframeform.tile2ofn1click geeft alle hier.Alle verklaringen (en -) in de eerste plaats gegeven.,,, is dit echter niet opgesteld.Ik in de draad van een complex "zoon" textedit los, ik heb een minimale steun voor infrastructuur, hier.In de volgende tabel, aandacht moet teditform raam in wsmaximized.Ik geef teditform.formclose in ter ondersteuning van de code, en teditform.open in plaats van routine.Mijn amendementen volgen welke dossiers open is, wordt het pad van de heropening is noodzakelijk.,,, een weg naar beneden is moet ik ook in mijn eerste artikel.Ik heb de code van de test heeft betrekking op alle dossiers aan de redactie van de tekst van een bende.Elke keer dat je een is een verzet.Dus ik tframeform.open1click bende - met inbegrip van de vervanging van de behandeling.De aandacht op de dagelijkse vertellen hoe je de teksten tot wijziging van de eigenschap.,,,,,,, de code: een eigendom in tframeform:,,, de invoeging van een nieuw raam /W en tussen de ramen /cascade - menu 's.En de tegels top & 2 van 'n ramen, het item onderschrift), naam, kan worden chopped te Tile2ofN1.,,,, TEditForm WindowState: wsmaximized niet gecontroleerd is, TFrameForm,,,,,,,,, var (wereldwijde)...,, TileTwo: TstringList;,,,,, OpenFiles: TstringList; initialisatie,,, ///////TileTwo is voor de belangrijkste code, TileTwo: = TStringList.Create;,,,, TileTwo.Text: = "; ///////OpenFiles is een systeem voor juri-rigged houden en open dossiers van,, OpenFiles: = TStringList.Create;,, OpenFiles.Text: =";,,, - de belangrijkste code, a TFrameForm pakken!},,,. TFrameForm.Tile2ofN1Click (Sender: TObject), var;,,, I, j: gehele getal;,,, ",, als MDIChildCount < 2. De uitgang;,, als (MDIChildCount = 2) en (Tile2ofN1.Checked = valse), Tile1 beginnen, dan.Klik (afzender);,,,,,,, als aan het einde van uitgang;; (mdichildcount > 2) niet tile2ofn1. Inspectie, en dan begon, tile2ofn1. Controle: = waar;,, ik mdichildcount = 2: 1 te doen,, J = 0, voor om het bestand te openen, telt 1. - (mdichildren doen, als ik de titel [], de opening van het dossier. De string [J]) < > 0, en dan begon, tiletwo. Toevoeging van (een dossier openen. Akkoord [J]); mdichildren,, [I]. Gesloten;,, breekt; en, ten slotte,,,,,,, aan het einde van tile2ofn1: = waar controles;.;,, messagedlg (in deze demo, ik moet "," +, na een onderbreking voor het dossier te sluiten en +, dat "call - tile1click dus kinderen" + rEcalculated.Weet je mtinformation. "Mbok], [0);,, lockwindowupdate (aan);,,,, tile1click (afzender); lockwindowupdate (0);,,,, als tile2ofn1. Inspectie (tiletwo.text < >"), en dan begon, lockwindowupdate (verwerking), ben ik. Tiletwo: = 0, 1. Tellen, in plaats van te open1click /geleend van,, /reopenit in ewriter complexe doorkruisen, en teditform. Het creëren van (zelf), begin,,, open (tiletwo [M]);,, de etikettering: = 3 + m;,,,, aan het einde van mdichildren mdichildcount [2];. Bringtofront;,,,, lockwindowupdate (0); tiletwo. De tekst: = ";,, tile2ofn1. Controle: = vals;,,,,,,, aan het einde van het,,,,, ter ondersteuning van de code, een proces dat: -In TEDitForm houden en die file ga en closes en replace routines al there},,,. TEditForm.FormClose (Sender: TObject; var: TCloseAction), var;,,,.,,, ik Longint;, voor ik: = 0 te OpenFiles.Count - 1, als OpenFiles[i] = Pathname doen, dan beginnen OpenFiles.Delete,,, (I);,,,, aan het einde van de pauze; actie: = caFree;,,,,,,,,,, de procedure TEditForm.Open (totaal AFileName: string);,, ",, pathname: = AFileName;,, Legende: = ExtractFileName (AFileName);,, ///////Pathname. In OpenFiles lijst, OpenFiles.Add (Pathname); redacteur, en met de doen, ik Lines.LoadFromFile (pathname);,,,,,, SelStart: = 0; gemodificeerde: = valse;,,,,,,,,,,, {Taking in meerdere dossiers van je tests?Als je de keuze is makkelijk tframeform opendialog1, opties, de keuze van een veelheid van echte.En dan, in plaats van de normale procedure, de volgende open1click}, tframeform. Open1click (afzender: TObject);,, var, ik begin: gehele getal;,,,,, als een open dialoog. Na de uitvoering van lockwindowupdate (aan);,, ik: = 0 - 1, en openfiledialog.files.count doen, creëren teditform. (zelf), open (een open dialoog, documenten [M]); lockwindowupdate (0);,,,,,,, een einde te maken aan de; - bibliografie, begon ik te improviseren deze artikelen te doen wat ik doe, ewriter in Delphi, in textedit (demonstratie van mij, ewriter). In de tekst van deze uitgave, die een heel natuurlijk.Maar, misschien moet je heen en weer om te voorzien in de nieuwe, missen, of, verandert de steun de routine.De meeste plaatsen heeft de zwarte doos.Dit is de kaart, de lopende "winkel" te praten...,, de programmering /(preventief) in MDI bewerken,,,http://www.howtodothings.com/showarticle.asp?Artikel = 143,,,,,,,,,,,, tegels MDI bewerkenhttp://www.howtodothings.com/showarticle.asp?Artikel = 147,,,,,,, - aantal in MDI redacteur,,,http://www.howtodothings.com/showarticle.asp?Artikel = 154,,,,,,,, "stop" van een tekst...,,,http://www.howtodothings.com/showarticle.asp?De artikelen = 178,,,,,,