existiert ein char im edit?

[TheAn00bis]

Wie kann ich prüfen, ob ein char im edit2 existiert oder nicht?

Hab das hier versucht:

Delphi-Quellcode:

if (edit2.text[1]<>nil) then begin

"Inkompatible Typen"

Denn wenn edit2.text[1] nicht existiert und darauf zugegriffen wird, gibt es ja einen Fehler. Hab außerdem assigned und try versucht und

Delphi-Quellcode:

if (edit2.text[1]<>'') then begin

aber immer wird ein Fehler angzeigt, wenn das edit2 leer ist. Ich könnte natürlich überprüfen ob edit2.text[1] in [...hier die ganzen ansi codes...] aber das wäre ja viel zu aufwendig.

[Torpedo]

Wie wärs mit:

Delphi-Quellcode:

if edit2.text <> '' then

:)

[malo]

@Torpedo: Er will ja nur einzelne Zeichen prüfen ;)

@Topic: Versuch es doch mal über die String-Länge.

Delphi-Quellcode:

if Length(Edit2.Text) >= 1 then
//

[Aenogym]

alternativ wäre auch möglich:

Delphi-Quellcode:

if copy(edit1.text, 0, 1) = 'a' then

Aenogym

[mirage228]

Zitat:

Zitat von Aenogym

alternativ wäre auch möglich:

Delphi-Quellcode:

if copy(edit1.text, 0, 1) = 'a' then

Aenogym

Hi,

soweit ich weiss beginnt ein String bei 1 und nicht bei 0 und wieso nicht so ;) ?

Delphi-Quellcode:

if Edit1.Text[1] = 'a' then

mfG
mirage228

[TheAn00bis]

Danke, malo! Bin ich nicht drauf gekommen!

Zitat:

Zitat von mirage228

soweit ich weiss beginnt ein String bei 1 und nicht bei 0 und wieso nicht so ;) ?

Delphi-Quellcode:

if Edit1.Text[1] = 'a' then

mfG
mirage228

Weil ich das dann für alle 255 Zeichen der Ansi Tabelle hätte machen müssen...

Edit: 256, hab übersehen, dass die 0 auch belegt ist ;)