linker teil, rechter teil des Strings :? :freak:

Anfängerfragen zum Programmieren mit PureBasic.
IcedCoffee
Beiträge: 115
Registriert: 09.07.2005 12:11
Wohnort: Fürstenwald [Internat], Berlin[wen keine lust auf Internat], Wildau[Einfamilienhaus]
Kontaktdaten:

linker teil, rechter teil des Strings :? :freak:

Beitrag von IcedCoffee »

Moin
also ich will das wenn der user in seinem text etwas makirt das ich dan den linken teil des texts habe und den rechten teil aber nicht den makirten teil
also wisst ihr was ich meine: nein?
also kleines z..b
so der rote text ist jetzt mal makirt
Hallo ich bin der zb Satz
so jetzt will ich zwei vars haben ein mal mit "der zb Satz" und einmal mit "Hallo ich"
so ich habe mir da schon gedanken gemacht aber bekomme es einfach nicht hin

Code: Alles auswählen

  SendMessage_(GadgetID(#String_0),#EM_GETSEL,@GetSelAnfang,@GetSelEnde)
  TempDateiInhalt.s = GetGadgetText(#String_0)
  TempDateiInhaltLSet.s = LSet(TempDateiInhalt, GetSelAnfang)
  TempDateiInhaltRSet.s = RSet(TempDateiInhalt, Len(TempDateiInhalt) - GetSelEnde)
Benutzeravatar
Kiffi
Beiträge: 10714
Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9

Re: linker teil, rechter teil des Strings :? :freak:

Beitrag von Kiffi »

verwende anstelle von LSet() und RSet() die Funktionen Left() und Right() bzw. Mid().

Grüße ... Kiffi
a²+b²=mc²
Benutzeravatar
Batze
Beiträge: 1492
Registriert: 03.06.2005 21:58
Wohnort: Berlin
Kontaktdaten:

Beitrag von Batze »

Code: Alles auswählen

OpenWindow(0, 0, 0, 200, 40, #PB_Window_MinimizeGadget, "Fenster")
CreateGadgetList(WindowID(0))
StringGadget(0, 10, 10, 160, 20, "Hallo Leute wie gehts")
ButtonGadget(1, 170, 10, 20, 20, "OK")

Repeat
  Event = WaitWindowEvent()
  If Event = #PB_Event_Gadget And EventGadgetID() = 1
    SendMessage_(GadgetID(0),#EM_GETSEL,@GetSelAnfang,@GetSelEnde)
    TempDateiInhalt.s = GetGadgetText(0)
    TempDateiInhaltLSet.s = LSet(TempDateiInhalt, GetSelAnfang)
    TempDateiInhaltRSet.s = Mid(TempDateiInhalt, GetSelEnde+1, 10000)
    Debug TempDateiInhaltLSet
    Debug TempDateiInhaltRSet
    Debug Mid(TempDateiInhalt, GetSelAnfang+1, GetSelEnde-GetSelAnfang)
  EndIf
Until Event = #PB_Event_CloseWindow
Aber Kiffi war schneller. :freak:
Hier sind meine Codes (aber die Seite geht gerade nicht):
http://www.basicpure.de.vu
Benutzeravatar
Kiffi
Beiträge: 10714
Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9

Beitrag von Kiffi »

> Aber Kiffi war schneller.

dafür hast Du ein schönes Beispiel mitgepostet :allright:

Grüße ... Kiffi
a²+b²=mc²
Benutzeravatar
Batze
Beiträge: 1492
Registriert: 03.06.2005 21:58
Wohnort: Berlin
Kontaktdaten:

Beitrag von Batze »

Tja, ohne das hab ich den Fehler nicht gleich gefunden.
Hier sind meine Codes (aber die Seite geht gerade nicht):
http://www.basicpure.de.vu
Antworten