> procedure TForm1.Edit1Change(Sender: TObject);
> begin
> if trim(edit1.text) = '1' then
> edit1.text := '01';
> end;
Tak for alle dine svar på mine spørgsmål
1) Hvad sker der hvis jeg skriver "edit1EXIT" istedet for edit1change?
Bliver det så først udført, når jeg flytter til et andet felt?
2) Det er sådan set rigtigt nok det du skriver, jeg har nok bare ikke
udtrykt mig klart nok.
Min egen version, ikke i pascal sprog, men måske kan du forstå hvad jeg
mener:
If edit.text = 'et ciffer' then
variabel = edit.text;
edit.text = '0'+variabel;
jeg ved ikke om du kan forstå hvad jeg mener, men altså kort fortalt:
Hvis det der står i edit er kun 1 ciffer så skal den gemme værdien i en
variabel.
Derefter skal den skrive '0' og det tal der står i variablen.
Kan man det?
// Hjalte