时间戳

首页 > 解决方案 > 如何将字符串分配给整数？

delphi - 如何将字符串分配给整数？

问题描述

这是现在的代码：

procedure TForm1.Button1Click(Sender: TObject);
var j,r:integer; k:string;
begin
  k := Edit1.Text;

  if StrToInt(k) > 0 then 
    if StrToInt(k)<10 then
      r := StrToInt(k);
  if StrToInt(k) = 10 then
    r := 1;
  if StrToInt(k) > 10 then 
    if StrToInt(k) < 190 then
      j:=StrToInt(k) mod 10;
  r := j-1;

  ShowMessage('Na toj poziciji se nalazi: '+ IntToStr(r));
end;

当我写k:=Edit1.Text选项时甚至不建议使用。有人有解决方案吗？

标签： delphidelphi-7

解决方案

您正在尝试将声明为整数的“k”设置为来自 Edit1.Text 的字符串

使用 StrToInt 将 Edit1.Text 转换为整数，然后重试。顺便说一句：“不兼容的类型：'Integer' 和 'TCaption'”就是这个意思。这是不兼容的。

推荐阅读