На нашем сайте вы найдете множество статей на разные тематики, а так же сможете найти и скачать много интересного Рекомендуем Вам добавить Наш сайт в закладки, а также подписаться на RSS ленту, чтобы не пропускать интересных новостей.
Переделывал стандартную программу Вроде бы все правильно - но не работает. Точнее работает но пишет либо Х либо ошибку. Нужно что бы одно число умножалось на другое. Ввод данных через поле ввода. Оба числа дробные, одно из них меньше единицы. Я так подозреваю заморочка с типом переменных. Уже пробовал разные. Но "Воз и ныне там" Подскажите пожалуйста. Заранее благодарен!
private { Private declarations } public { Public declarations } end;
var Form1: TForm1;
implementation
{$R *.dfm}
// подпрограмма procedure Raschet; var a: real; b: real; c: real; mes: string[255]; // сообщение begin a := StrToFloat(Form1.Edit1.Text); b := StrToInt(Form1.Edit2.Text); c := a * b;
Эмммм... В работе со строками я не силен, но подумаем)))))
Добавлено (29.07.2011, 22:00) --------------------------------------------- Вот на почитай статью на моем сайте, думаю поможет ссылка на статью тут Если что не поймешь пиши либо там в комментах, либо сюда)))
Сайт посвященный программированию в среде Delphi. Вопросы по Delphi и HTML на форуме
Да я тебя прекрасно понимаю.... Вроде бы легче не бывает... Это просто из того что не целое число... Другую функцию надо использывать.. В статье все сам поймешь Сайт посвященный программированию в среде Delphi. Вопросы по Delphi и HTML на форуме