webForumDet fria alternativet
Logga in / Bli medlem

Textruta

Programmering

1 svar · 227 visningar · startad av msossna

msossnaMedlem sedan feb. 2002476 inlägg
Frågan#1

Hur ställer man in en textruta så att den bara tar siffror?

TigermannenMedlem sedan juli 200124 inlägg
#2

Skriv följande i editboxens onKeyPress-event:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (Key in ['0'..'9', #8, '.', '-']) then
Key := #0;
end;

mvh Tony

655 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
127 ms — deklarationer (db)
0 ms — hämta statistik (cache)
523 ms — hämta tråd, inlägg och bilagor (db)
128 ms — ändringar (db)