Funktion Copy verwenden - wie?

**Lyan**

Ah, sch**ß C&P. Was soll denn

Zitat:

Delphi-Quellcode:

			if strtoint(memo2.Text) <> 0 then

    richedit1.SelAttributes.Style := [fsBold];

bewirken? Dann darf in dem Memo auch nur eine Zahl stehen und nichts anderes.

Wollte damit bewirken das man keine leeren messages senden kann

**DeddyH**

Dann ersetze das StrToInt durch Length.

**Lyan**

okay funktioniert jetzt...

aber nur die attribute funktioniert (also das Bold) was dann später die Übersicht halten soll, dass man besser sieht was man selber geschrieben hat

Also das mit dem copy

**DeddyH**

Wenn ich Dich recht verstehe (ich habe jetzt keine Lust, den gesamten Code durchzugehen) musst Du das im Groben so machen:
- Farbstring auslesen und in TColor umwandeln (erledigt)
- ggf. SelLength des Richedits auf 0 setzen
- SelAttributes.Color auf die ermittelte Farbe setzen
- SelText auf den restlichen Text der Nachricht setzen

**Lyan**

Ich löse das mit Pos und PosEX ...

**DeddyH**

Hm? Zeig mal.

Funktion Copy verwenden - wie?

AW: Funktion Copy verwenden - wie?

AW: Funktion Copy verwenden - wie?

AW: Funktion Copy verwenden - wie?

AW: Funktion Copy verwenden - wie?

AW: Funktion Copy verwenden - wie?

AW: Funktion Copy verwenden - wie?

Forumregeln

Lyan Registriert seit: 5. Aug 2011 188 Beiträge	#1 AW: Funktion Copy verwenden - wie? 18. Aug 2011, 09:27 Zitat von DeddyH: Ah, schß C&P. Was soll denn Zitat: markieren Delphi-Quellcode:** if strtoint(memo2.Text) <> 0 then richedit1.SelAttributes.Style := [fsBold]; bewirken? Dann darf in dem Memo auch nur eine Zahl stehen und nichts anderes. Wollte damit bewirken das man keine leeren messages senden kann
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.666 Beiträge Delphi 12 Athens	#2 AW: Funktion Copy verwenden - wie? 18. Aug 2011, 09:28 Dann ersetze das StrToInt durch Length. Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

Lyan Registriert seit: 5. Aug 2011 188 Beiträge	#3 AW: Funktion Copy verwenden - wie? 18. Aug 2011, 09:31 okay funktioniert jetzt... aber nur die attribute funktioniert (also das Bold) was dann später die Übersicht halten soll, dass man besser sieht was man selber geschrieben hat Also das mit dem copy Geändert von Lyan (18. Aug 2011 um 09:33 Uhr)
	Zitat

Lyan Registriert seit: 5. Aug 2011 188 Beiträge	#5 AW: Funktion Copy verwenden - wie? 18. Aug 2011, 10:10 Ich löse das mit Pos und PosEX ...
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.666 Beiträge Delphi 12 Athens	#6 AW: Funktion Copy verwenden - wie? 18. Aug 2011, 10:14 Hm? Zeig mal. Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat