Textarea und Rückgängig machen?

Übersicht BlitzBasic BlitzPlus

Neue Antwort erstellen

Dante

Betreff: Textarea und Rückgängig machen?

BeitragSa, Jun 04, 2005 18:06
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo Very Happy

Ich hab mal ne Frage, undzwar ist es möglich die
Rückgängig-Funktion von Textareas so zubenutzen,
dass sie nur die letzte Zeile und nicht das GANZE Feld
LÖSCHEN?

Könnt ja mal gucken was ich mein^^

BlitzBasic: [AUSKLAPPEN]
Global Win = CreateWindow(\"Editor\",0,0,385,270,0,1)
Global TxtArea=CreateTextArea(5,5,368,200,Win,2)

Global start=CreateButton(\"Speichern\",220,210, 70,20, Win)
Global abbruch=CreateButton(\"Abbruch\",304,210, 70,20, Win)

While Win

tmp = WaitEvent(50)
If tmp=$803 Or EventSource() = abbruch
FreeGadget Win:End
EndIf

Wend


MfG
Bad-Rat[/code]

Smily

BeitragFr, Jun 10, 2005 20:58
Antworten mit Zitat
Benutzer-Profile anzeigen
Du musst einfach den Text aus dem Textfeld von Rechts nach links durchgehen und dir beim ersten Enterzeichen (Ist glaube ich Chr$(13) Bin mir aber nicht sicher) die Position in eine Variable speichern. Der Rest ist dann ganz einfach:

Bsp:
Im Textfeld steht:

Code: [AUSKLAPPEN]
Test 1
Test 2
Test 3


Dann gehe von hinten nach vorne durch.

nach dem 6. Zeichen müsste ja dann CHR$(13) Zurückgegeben werden.
Dann Musst du die Gesamtlänge der Kette minus die 6 Rechnen und schon hast du die Position, an dem der Text abgeschnitten werden soll. Screibe diesen "geschnittenen" Text mit Left() in eine Variable. Dann musst du nur noch mit SetGadgetText das Textfeld verändern.
Lesestoff:
gegen Softwarepatente | Netzzensur | brain.exe | Unabhängigkeitserklärung des Internets

"Wir müssen die Rechte der Andersdenkenden selbst dann beachten, wenn sie Idioten oder schädlich sind. Wir müssen aufpassen. Wachsamkeit ist der Preis der Freiheit --- Keine Zensur!"
stummi.org

Dante

BeitragSa, Jun 11, 2005 21:57
Antworten mit Zitat
Benutzer-Profile anzeigen
Danke Very Happy
Werd ich mal machen.

Ciao

Neue Antwort erstellen


Übersicht BlitzBasic BlitzPlus

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group