Einzelnen Beitrag anzeigen

J Kadison

Registriert seit: 8. Sep 2007
Ort: Ebertsheim
96 Beiträge
 
Delphi 7 Personal
 
#1

FindComponent oder was ?!?! (sry nix besseres eingefallen)

  Alt 16. Jul 2008, 12:00
Hallo Leutle!

Ich hätte da gerne mal wieder ein Problem ^^

Und zwar: ich will ne Prozedur (in ner eigenen Unit) schreiben, die mir was Verschlüsselt. (hab ich auch, klappt auch mal ausnahmsweise )
aber jetzt hab ich das ganze nur darauf spezialisiert, dass dateien verschlüsselt werden. Nun möchte ich aber, dass der dat Janze auch aus nem Memo von ner anderen Form (im der Glecihen Applicatiron) verschlüsselt.

Also:

Delphi-Quellcode:
  //Datei=True
  If Datei = True then begin
    sl:=TStringList.Create; //Objekt erzeugen
    if FileExists(Quelle) then
      sl.LoadFromFile(Quelle);
    text:= sl.gettext; //Datei öffnen
    sl.free; //Objekt wieder freigeben
  end Else begin

  //Datei = False

  end;
Ich hab ne boolean (Datei) . wenn die true ist, liest der meinen text aus der datei 'Quelle' ein. und nun möchte ich, wenn datei=false dass der das in Quelle angegebene memo nimmt also z.b. Quelle = 'Form1.MeinMemo' und nun soll er den Text aus der memo in die Var text schreiben.

Wie kann ich das denn am dümmsten anstellen?
(Google ist leider nicht mein Freund. Zeigt mir alles blos nicht, wie ich das machen kann. )





Edit:
Kann ich das überhaupt machen ohne dass ich oben in die Uses die andere Unit eintrage?
Weil das Ganze soll für viele Programme gelten und somit kann ich nicht immer die anderen units eintragen
MFG
Joshi
  Mit Zitat antworten Zitat