Home / Questions / 4630
Accepted
Goerman
Asked: 2020-02-24 04:16:31 +0800 CST 2020-02-24 04:16:31 +0800 CST

Error displaying local variable in Delphi: "Record, object or class type required"

  • 772

I'm trying to display a local variable in a message, but I'm not clear on the concept.

Code:

procedure TForm1.Button1Click(Sender: TObject);
var
 i:integer;
begin
 i:=1;
 ShowMessage(i.AsString);
end;

Mistake:

[Error] Unit1.pas(31): Record, object or class type required
delphi

3 Answers

  1. Best Answer

    Embarcadero 's documentation on this error specifies that it can occur for one of two reasons:

    • By applying the notation '.' to an element that is not an object, record, or class variable.
    • Using a variable with the wrong type in a WITH statement.

    It is not the second case, but the first, because it is intended to apply .AsStringto a variable of type intthat is not an object or record.

    A quick fix would be to use inttostr(i)instead of i.AsString:

    ShowMessage(inttostr(i));
    • 2

  2. In modern versions of Delphi, you can use a notation quite similar to the one that is giving you the error, as long as you have included the unit system.sysutilswithin the unit clause usesthat contains the code, you can call the method ToString()on an integer variable, which, behind the scenes, will pull the type helper TIntegerHelper , the correct syntax is:

    implementation
uses system.sysutils;

procedure TForm1.Button1Click(Sender: TObject);
var
  I: integer;
  S: string;
begin
  I := 1;
  ShowMessage(I.ToString);
  //además:
  S := '10452';
  if I.tryParse(S) then
    ShowMessage(I.ToHexString);
end;

    In the documentation you can find more examples of the methods available in integer type helpers and more information about type helpers in general.

    If you don't include the unit sysutilsin the uses clause, these helpers won't be available to your code.

    All links take you to resources in English.

    • 0

  3. I think what you need to do is change the:

      ShowMessage(i.AsString);

    For:

      ShowMessage(i.ToString);
    • 0