existiert ein char im edit?

[TheAn00bis]

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

Hab das hier versucht:

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
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:
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:

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

[mirage228]

Zitat von Aenogym:

alternativ wäre auch möglich:

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 ?
if Edit1.Text[1] = 'a' then mfG
mirage228

[TheAn00bis]

Danke, malo! Bin ich nicht drauf gekommen!

Zitat von mirage228:

soweit ich weiss beginnt ein String bei 1 und nicht bei 0 und wieso nicht so ?
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