Avatar billede juzas Mester
15. april 2016 - 21:10 Der er 2 kommentarer

Mellem to labels

Hej. Har to label (Label1), og (label2), og en (Edit). Label1 er MIN værdien, og label2 er MAX værdigen, og edit er selve værdien.

Nogle som kan hjælpe mig med et stykke kode som gør at hvis det tal jeg har i min (Edit) er mellem (Label1), og (label2) skal der komme en besked med teksten "Værdien er godkendt!".
Avatar billede martinlind Nybegynder
15. april 2016 - 21:15 #1
if StrToInt(edit1.text) in [StrToInt(Label1.Caption)..StrToInt(Label2.Caption)] then
ShowMessage('Værdien er godkendt!');
16. april 2016 - 01:26 #2
HEJ

Du kan også anvende  INRANGE (value, Amin, Amax);

Husk MATH i USES:


F.eks:

procedure TForm1.FormCreate(Sender: TObject);
begin
  IF Inrange(StrtoInt(Edit1.text), StrtoInt(Label1.Caption),
          StrtoInt(Label2.Caption)) then
  Edit1.Color := clGreen;
end;

Kr
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester