Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Помогите чайнику

Автор: Drizhenko 21.10.2005, 11:08

Помогите, пожалуйста. Нимогу ничего понять. Почему выдается ошибка [Error] Unit1.pas(30): Incompatible types: 'Integer' and 'Extended' и показывает на строчку

Код


  g:=100/2;

В чем дело?

Код


unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  g:integer;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  g:=100/2;
end;

end.

Автор: Rennigth 21.10.2005, 11:15

Drizhenko

Код


procedure TForm1.Button1Click(Sender: TObject);
begin
  g:=Round(100/2);
end;

Автор: ~FoX~ 21.10.2005, 11:21

Drizhenko
Ну какое же integer, если ты делене производишь?
Компилер, он дурак....если очень хочиться выполняей целочисленное деление.

Автор: Drizhenko 21.10.2005, 11:21

Спасибо парни smile

Автор: Bibimij 23.10.2005, 18:31

Цитата(Drizhenko @ 21.10.2005, 11:08)

Код


  g:=100/2;

Можешь ещё div вместо "/" использовать!
будет смотреться так:

Код


  g:=100 div 2;

И всё заработает! Удачи! smile

Автор: sergejzr 30.10.2005, 16:34

Модератор: Название темы должно отражать ее суть!
Модератор: Название темы должно отражать ее суть!

Автор: CaMoroH 30.10.2005, 18:25

Код


var
  g : Extender; {or real}