Tipp (wenn man sich seinen Quellcode komplett "zerschossen" hat):
* neue Form erstellen
* Folgendes dort rein:
Delphi-Quellcode:
type
Adresse = record
name: string[50];
strasse: string[100];
plz: integer;
ort: string[50];
end;
TForm1 = class(TForm)
private
{ Private-Deklarationen }
datei: file of Adresse;
procedure positionieren(datensatz: integer);
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
* mit dem Cursor auf
positionieren
und Strg+Shift+C
* in die alte Form gehn
* alle Komponenten (im Fenster) makieren, kopieren und in der neuen Form einfügen
* ab jetzt das Projekt nicht speichern
* dann über den
OI alle Events neu erzeugen
* * doppelt auf die Buttons klicken
* * über den
OI OnCreate und OnDestroy anlegen
* aus dem alten Projekt die Prozedurinhalte in die neuen Prozeduren kopieren (Jede einzeln)
* nun kann man wieder speichern (habt ihr zwischendurch gespeichert, dann muß man die noch leeren Prozeduren erneut erstellen, da sie entfernt wurden, weil der Compiler dachte die braucht keiner ... oder man schreibt erstmal überall schnell ein
//
zwischen BEGIN und END )
Oder man erstellt nur die jeweilige Prozedur, für welche man grade den Code neu einfügen will.