SPECIAL OFFER        Order and save right now!
20% off with the 729824315 dicscount code for Ultimate Pack and any another product for Delphi from Greatis Programming!

⤷ Convert mm to inch and back

We know, that one inch contains 25.4 mm. So, to convert mm to inch, we should made division of value and 25.4. To convert inch to mm, we should made multiplication of value and 25.4.
For example:

// MmToInch
procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Caption:=FloatToStr(StrToFloat(Edit1.Text)/25.4);
end;

// InchToMm
procedure TForm1.Button2Click(Sender: TObject);
begin
  Label2.Caption:=FloatToStr(StrToFloat(Edit1.Text)*25.4);
end;
More for developers
Databases for Amazon Associates
Amazon Categories
Amazon Nodes