|
|
Другие темы раздела | |
Delphi Тест Delphi
https://www.cyberforum.ru/ delphi-beginners/ thread1443587.html Сделал тест на Delphi, но все делается только лишь однообразно 10 вопросов и по порядку каждый раз... А как мне сделать, чтобы эти вопросы наугад выводились, да и варианты ответов чтоб наугад выводились..? Помогите пожалуйста procedure TForm1.Button2Click(Sender: TObject); begin Inc(QuestionNum); lbl1.Visible:=true; Button2.Caption:='Далее'; GroupBox1.Color:=clYellow; if... |
Delphi Функция среднего роста Ребят, нужна помощь. Нужно описать функцию вычисления среднего роста в группе у девочек. С вводом и выводом проблем нет, помогите с функцией - в программе она называется sredrost. Заранее спасибо. unit Unit1; interface uses SysUtils, Types, Classes, Variants, QTypes, QGraphics, QControls, QForms, QDialogs, QStdCtrls, QExtCtrls, QGrids; type |
Delphi Добавить букву в конец нетипизированного файла Здравствуйте.Такой вопрос.Как добавить букву в конец НЕтипизированного файла. С ними ведь можно делать следующее: просмотреть и добавить новый компонент в конец файла. Заранее спасибо. https://www.cyberforum.ru/ delphi-beginners/ thread1443534.html | Delphi Ошибка в программе [тема textfile, параметры, var] program laalaa; {$APPTYPE CONSOLE} uses SysUtils; var NFile: string; Function max(var NFile: string): string; https://www.cyberforum.ru/ delphi-beginners/ thread1443532.html |
Загрузка проекта с 3 формы Delphi Ребят, как сделать что бы при запуске проекта, открывалась 3 форма допустим, а не 1; Подскажите пожалуйста. |
Delphi StringGrid Работа со строками
https://www.cyberforum.ru/ delphi-beginners/ thread1443453.html Ох, люди добрые, помогите пожалуйста Делал лабу на Delphi, почти всё доделал и где-то допустил косяк Косяк следующий: На Form2 - есть поля, обозначающие какой-то набор атрибутов, который по нажатию на кнопку "Добавить" должен вноситься в StringGrid1 на Form1 По-началу всё прекрасно добавлялось в таблицу, но сейчас вообще ничего не происходит! P.S. Любопытно, что если использовать готовую... |
Delphi Дублируется вывод информация из потока
https://www.cyberforum.ru/ delphi-beginners/ thread1443451.html В общем, каждый поток получает информацию со странички с разным id, т.е потоки синхронно работают с разными страницами, но иногда эта информация дублируется, т.е: hklkv / 487 fkplv / 498 dmlkv / 489 xulhv / 499 fdlnk / 500 fdlnk / 500 fdlnk / 500 |
Delphi Обработка данных комбинированного типа Условие задачи на картинке. помогите пожалуйста реализовать код |
Delphi Заменить все большие семи члены последовательности числом 7. Вычислить количество таких членов Даны натуральные число n,целые числа a1...an.Заменить все большее семи члены последовательности a1...an числом 7. Вычислить количество таких членов. Помогите с задачей. https://www.cyberforum.ru/ delphi-beginners/ thread1443424.html | Delphi Как скомпилировать приложение Как сделать .exe файл в delphi7 через Project>Options? (packages) - точно как? p.s. другие способы создания .exe файлов читал, для меня они не подходят, нужен независимый .exe.:wall: https://www.cyberforum.ru/ delphi-beginners/ thread1443418.html |
Delphi Вычислить выражения, не используя стандартную функцию min Срочно нужна помощь с задачей по Delphi. Даны действительные числа a и b. Вычислить, не используя стандартную функцию min: u=min(a,b), v=min(a*b, a+b), min(u+v^2, 3.14). |
Delphi Неправильно считает частоту
https://www.cyberforum.ru/ delphi-beginners/ thread1443315.html Подскажите как мне посчитать частоту букв. Здесь частота неправильно считается,т.е. если например в тексте 1200 символов неправильно считает unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls,math; |
13107 / 5888 / 1707
Регистрация: 19.09.2009
Сообщений: 8,808
|
||||||
11.05.2015, 22:59 | 0 | |||||
Неправильно работает функция - Delphi - Ответ 760050911.05.2015, 22:59. Показов 768. Ответов 1
Метки (Все метки)
Ответ
Потому, что массив x всегда обнулённый оказывается. Процедура Input() не возвращает заполненный массив в вызывающий код. Т. е., при вызове Input(x), содержание массива x не изменится. Чтобы это исправить, параметр надо объявить со спецификатором var:
В дополнение. Если переменная объявлена на глобальном уровне, то она при запуске программы обнуляется. В том числе массивы - обнуляются их элементы. Если переменная объявлена на уровне подпрограммы или метода - тогда её содержимое не определено - там может быть любой "мусор". В данном случае массив "x" объявлен на глобальном уровне. Поэтому, изначально, при запуске программы, все его элементы обнулены. Вернуться к обсуждению: Неправильно работает функция Delphi
1
|
11.05.2015, 22:59 | |
Готовые ответы и решения:
1
Неправильно работает функция gets( ) Неправильно работает функция Неправильно работает функция Неправильно работает функция |
11.05.2015, 22:59 | |
11.05.2015, 22:59 | |
Помогаю со студенческими работами здесь
0
Неправильно работает функция Неправильно работает функция rand() Неправильно работает функция replace()? Неправильно работает функция strrev |