[delphi] edit fiield controleren op tekens

[bgever]

1. Hoe kun je bepaalde tekens die in een edit field staan herkennen, en een melding geven naar de gebruiker. Of hoe zou je die tekens kunnen verwijderen?

2. Als ik een string heb, hoe zou ik het laatste teken van die string kunnen verwijderen?

[Verwijderd]

1. Die controle zal je moeten uitvoeren in de OnKeyPress event van het edit field.


2. Delete(StringVariabele, StringVariabele.Length, 1)

[bgever]

Bedankt voor nr. 2

Maar over 1, ik heb een string, en daarin moet gekeken worden of tekens als / | en \ erin voorkomen, deze mogen namelijk niet in die string staan. Als ze er in staan moet er een melding gegeven worden. Ik hoef alleen maar te weten hoe ik ze kan herkennen, en dat dan die melding wordt gegeven.

[Verwijderd]

Zet deze code in de OnKeyPress event van je edit field:

code:

  if (Key = '/') or (Key = '|') or (Key = '\') then
  begin
    // Geef hier de foutmelding
    Abort;
  end;

[bgever]

K thanks, dit werkt perfect

[Verwijderd]

netter is:

code:

if (Key = '/') or (Key = '|') or (Key = '\') then
  begin
    // Geef hier de foutmelding
    Key = '';
  end;

en nog netter:

code:

if Key in ['/','|','\'] then
  begin
    //foutmelding
    key:='';
  end;