Hi
Ich habe ein etwas komplizierteres Problem.

Also... ich fang mal an ^^

Ich möchte ein kleines Programm schreiben, dass nach eingabe von Wörtern und Zahlen,
diese zu einem daraus generiertem Zahlen String konvertiert.

Will heißen:

Eingabe1: Aber Hallo
Eingabe2: 123456788
Eingabe3: 111

Generiere: 51353595235235887235892375842
oder : g39ng34ngd98g5nd5mjhe958eh58h

Wenn ein andere Benutzer diesen string bekommt, soll er diesen mit dem Programm
auch wider ENTschlüsseln können.
Die zahlen müssen also auch wider an ihren Positionen landen;
So das im Editfeld-1 "Aber Hallo" steht
und im Editfeld-2 "123456788"

Ist das zu realisieren ?

(habe an soetwas wie kontrollpunkte gedacht, dass z.B. $ für das nächste editfeld steht)

Grüße Nowo

Die Trennzeichen sind das kleinere Problem. Das von Dir definierte Trennzeichen kannst Du soweit (vermutlich) problemlos einsetzen.
Allerdings kannst Du die Feldgrösse auch mit anderen Mitteln in Deinem Schlüssel integrieren/verstecken oder aber Du definiest z.B. feste Feldgrössen.
Bezüglich Verschlüsselung findest Du hier im Forum div. Beiträge www.delphi-forum.de/...search_id=1219191097

Hey, habe gestern eine sehr schöne Seite im Bezug auf Delphi gefunden. Hier wird das so in etwa besprochen, es geht auch um Text Ver und End Schlüsselung. www.bergt.de/worksho.../html/projekt202.htm Vielleicht hilft die das ja weiter oder gibt dir einen denk Anstoß.

Ok klappt wunderbar soweit.
Nur muss ich jetzt die daten wider zurückgeben:

Edit1=AACCCCC
Edit2=§GG§G§G
Edit3=UHUHUHU
Ergibt=AACCCCC§GG§G§GUHUHUHU

Wie stelle ich das an das er mit einem anderen Button die jeweiligen strings wider zuordnet ?

MagicRain hat folgendes geschrieben :

Hey, habe gestern eine sehr schöne Seite im Bezug auf Delphi gefunden. Hier wird das so in etwa besprochen, es geht auch um Text Ver und End Schlüsselung. www.bergt.de/worksho.../html/projekt202.htm Vielleicht hilft die das ja weiter oder gibt dir einen denk Anstoß.

Die dort vorgestellte Lösung ist aber nur zur Demonstration von if..then geeignet, mehr nicht. Wirklich so machen würde man das ja nie sinnvoll.

Nowo hat folgendes geschrieben :

Wie stelle ich das an das er mit einem anderen Button die jeweiligen strings wider zuordnet ?

Ich verstehe nicht so ganz was du meinst, ich weiß ja auch nicht wie dein Quelltext aussieht. Wenn du eine Variable mit einem String hast und der in ein Edit soll, dann wäre das sowas:Oder was meinst du?

Naja ich habe ja Viele variablen
z.B.:
var1 var2 var3
ababaebebbe904823476237bva8eva78v67seve

Edit1.text:=ababaebebbe
Edit2.text:=904823476237
Edit3.text:=bva8eva78v67seve

das bäuchte ich :- /

Nowo hat folgendes geschrieben :

Naja ich habe ja Viele variablen z.B.: var1 var2 var3 ababaebebbe904823476237bva8eva78v67seve

Hast du jetzt 3 Variablen? oder eine lange? oder was jetzt?

Wenn du 3 Variablen hast, dann kannst du diese direkt zuweisen: Edit1.Text := var1;
Wenn du eine lange hast, dann müsstest du die Teile mit Copy auseinandernehmen.

Aber wenn du nicht zeigst was du eigentlich hast kann ich mit dem was du schreibst nicht viel anfangen.

jaenicke hat folgendes geschrieben :

MagicRain hat folgendes geschrieben : Hey, habe gestern eine sehr schöne Seite im Bezug auf Delphi gefunden. Hier wird das so in etwa besprochen, es geht auch um Text Ver und End Schlüsselung. www.bergt.de/worksho.../html/projekt202.htm Vielleicht hilft die das ja weiter oder gibt dir einen denk Anstoß. Die dort vorgestellte Lösung ist aber nur zur Demonstration von if..then geeignet, mehr nicht. Wirklich so machen würde man das ja nie sinnvoll.

Ja, Ok da hast du schon recht, wollte nur helfen Man könnte das ganze vielleicht auch mit einer XOR_Verschlüsselung versuchen.

Ich habe Viele Variablen die in 1nen String verschlüsselt werden sollen.
Also:
Edit1: Auto
Edit2: Haus
Edit3: 2008

ergibt:
AutoHaus2008

verschlüsselt:
UgEho§8Ge9E(

Und wenn man UgEho§8Ge9E( wider entschlüsselt sollen die strings wider getrennt werden.
Dazu müsste man das einfach so verschlüsseln UgEh#o§8G#e9E( sodas es Trennzeichen gibt.
Und ich möchte wissen wie man diesen satz wider auseinander klabautert (da es keine festen string größen/längen gibt.


Ah noch eine sache...
Wie verschlüssel ich den einen text mit einer zeichenkette ?
Ich habe das vor ca.2 Jahren mal mit einem Blatt papier gemacht.
das ging ungefähr so:

AUTOA UTO AUTOA UTOA
HALLO ICH HEIßE NOWO

Hier ist das Schlüsselwort "Auto"
Nun wird H mit A, A mit U, L mit T verschlüsselt.
Das gute ist: Auch wenn man doppel Buchstaben hat wie LL in "HALLO",
würde in der verschlüsselung kein doppelter Buchstabe auftauchen.

Wie Funktioniert das mit Delphi ?

Das könnte dir vielleicht einen Ansatz zeigen:
www.delphi-forum.de/viewtopic.php?p=365654

whaaaa =) alles wunderbar vielen Dank !!!

Nur habe ich jetzt noch das problem des trennens.

Konkrete Frage: Wie Trenne ich einen text via Sonderzeichen ?

Hallo#ich#heiße#Nowo
-
Hallo
ich
heiße
Nowo

Das ist eigentlich schon fast ein anderes Thema . Hier findest du entsprechenden Quelltext dazu, in der Library kannst du ruhig schauen, wenn du was suchst :
www.delphi-library.d...schreiben_13017.html