slepen, toont aan hoe je buiten toepassing laten vallen. De documenten zijn, eenheid;.,,,,,,, - interface, ramen, nieuws, SysUtils, klasse, grafische, de controles, de vorm, de dialoog,,,,,,,, is een stdctrls; gebeurtenissen = (platform), programma 's, formcreate (afzender: TObject);,, programma formdestroy (afzender: TObject);,, privé, persoonlijke verklaringen {},,, de bescherming van wmdropfiles (var. Het programma, dat wm_dropfiles: twmdropfiles); informatie;,,,,, {}, openbare verklaringen. Aan het einde var;,,,, form1: een gebeurtenis plaatsvindt;,,,,,, * * * * * * *} {% o. Voor de,,,,,, het gebruik van de procedures aan de hand shellapi; een incident. Formcreate (Afzender: TObject);,,,, dat noem je objecten tegen ramen {We willen weten wanneer het dossier is voor het beheer van de hulpbronnen, van de instrumenten voor het beheer van de vorm of de weg.}, slepen en voorwerpen (handvat, waar);,,,,, het einde van de procedure; een incident. Formdestroy (afzender: TObject);,,,, - kennisgeving, we willen niet meer laat bericht.}, slepen en voorwerpen (handvat, valse);,,,,, het einde van de procedure; een incident. Wmdropfiles (VAR): twmdropfiles);,,,, ik var, de gehele reeks:;,,,,,,,,,,, te doen, dragqueryfile en het nummer van Het document {noemen. 1 (dollar terug, ffffffff), respectievelijk in de vorm van een aantal dossiers vallen.}, en ik dragqueryfile: = 0 (een daling van 1, 0, 0 - 1), begint te doen,,, - hier noemen we dragqueryfile elk dossier de aanwijzing van een buffer, vallen, met een lengte van nul vast te stellen, moet het aantal tekens, de naam en de lengte van de toewijzing van een bepaalde regels voor het gebruik van de ruimte.,, aandacht, we moeten nog een voor waarde voor de dragqueryfile, terug naar nul, verlaat de kamer.De lengte (s), voorziet, dragqueryfile (vallen, ik niet, 0) + 1); in de Verenigde Staten, {geen behandeling, moet doen, de volledige dossiers, elke oproep na kan doen.Dragqueryfile (vallen), en, ik, pchar (s), lengte (s));,,,, aan het einde van {dragfinish; voltooiing van de operatie en de vrijlating van de desbetreffende middelen.}, dragfinish (vallen);,,,,,,, aan het einde van het einde;;.,