Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Изменение вида формы Помогите с решением одной проблемы. Есть форма, на ней расположено несколько кнопок и еще несколько элементов (Image, Label). Нужно сделать чтобы при нажатии на кнопки менялось содержание правой панели (появлялись другие элементы). Ну что-то типо переключения панелей. http://imageshack.us/photo/my-images/254/28974488.jpg/ Я попытался сначала скрыть все панели а потом благодаря команде:... https://www.cyberforum.ru/ delphi-beginners/ thread664682.html Delphi Динамические переменные
1) const n=10 type Rec = record x,y:real; end; PRec = ^Rec; T=array of PRec; PT=^T; var p:PT; r:PRec;
Delphi Создать на форме 3 текстовых поля и кнопку сложения Задание. Создать на форме 3 текстовых поля и кнопку сложения (равно). В одно текстовое поле записывается любая цифра ну 0 например во второе другая ну 5 например. И нужно чтобы в третьем текстовом поле вышел ответ сложения чисел от 0 до 5 (1+2+3+4+5). Помогите https://www.cyberforum.ru/ delphi-beginners/ thread664642.html Delphi StringGrid Ввод и вывод данных Даны сведения: фамилия, имя, знак зодиака, дата рождения (массив из трех чисел). Вывести информацию о человеке, чья фамилия введена с клавиатуры. https://www.cyberforum.ru/ delphi-beginners/ thread664638.html
Поиск множества с минимальной/максимальной мощностью Delphi
В динамическом одномерном массиве типа (типа T) указателей на множества (типа PtrM) const n = 10; type Elmnts = 0..9;//тип элементов множества M = set of Elmnts; //множество PtrM = ^M;//ссылочный тип указателей на множества M T = array of PtrM; //массив указателей на множества
Delphi Получение содержимого ListBox при подписки на событие dbClick https://www.cyberforum.ru/ delphi-beginners/ thread664583.html
Есть ListBox, там я подписался на события двойного клика мыши, получается что при клики на любую строку срабатывает это событие. Так вот как мне при клики на любую строку получить содержимое этой строки? Содержимое этой строки будет использоваться в процедуре этого события.
Delphi Копирование групп файлов, имеющих особенности в именах (например *. Txt) или в содержании https://www.cyberforum.ru/ delphi-beginners/ thread664569.html
Есть файловый менеджер(простой), и это должно быть одной из его функций. Я, если честно, не совсем понимаю что от меня хотят. Помогите, пожалуйста, с кодом и, если не сложно, объясните что к чему Может это просто копирование мультиселектом нужно сделать?
Почему в TListBox не появляется скролбар Delphi
На форме расположены несколько TListBox'ов но в одном из них не появляется скрол бар, хотя нужны и вертикальный и горизонтальный - во все добавляется много итемов и они не помещаются по ширине.
Delphi сделать калькулятор но так что бы при наведении на кнопки действий они убегали https://www.cyberforum.ru/ delphi-beginners/ thread664469.html
я посмотрел в этой теме всегда нужно кому то написать калькулятор, у меня на подобие такой же просьбы... может кто нибудь сделать калькулятор но так что бы при наведении на кнопки действий они убегали???(цифры что бы набирались)
Delphi Установка границ таблицы при экспорте из Delphi в Excel Программа экспортирует данные из DBGrid на лист экселя. В получаемой в экселе таблице нужно установить границы, при условии что заранее неизвестно, сколько в этой таблице будет записей. То есть, например, такое не прокатит: XLApp.ActiveWorkBook.WorkSheets.Range.Select; XLApp.Selection.Borders.LineStyle:=1; XLApp.Selection.Borders.Weight:=2; ибо так либо нарисуются ненужные границы, либо не... https://www.cyberforum.ru/ delphi-beginners/ thread664410.html
Начальное значение максимального элемента Delphi
program 1; { Дана последовательность целых чисел (длина последовательности заранее не известна, использовать функцию SeekEoLn или SeekEoF). Найти сумму отрицательных чисел, кратных 7, наибольшее из таких чисел и номер этого числа в последовательности.} {$APPTYPE CONSOLE} uses SysUtils;
Delphi Метод Симпсона: разобрать логику программы Наковырял код, переделал под свой интеграл, считает всё правильно, но я не могу понять сам алгоритм вычисления интеграла. (как считать вручную понимаю). Помогите разобрать логику программы. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, jpeg, TeEngine, Series, TeeProcs, Chart; type https://www.cyberforum.ru/ delphi-beginners/ thread664352.html
1 / 1 / 0
Регистрация: 06.10.2012
Сообщений: 13
0

Функция выдает ошибку: "Return value of function 'Through' might be undefined" - Delphi - Ответ 3526181

06.10.2012, 16:11. Показов 10015. Ответов 4
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Привет Всем!
Вот написана функция :

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
 
FUNCTION  Through( k, m :INTEGER; N_f :WORD) :WORD;    //  skvoznoy nomer uzla*
   BEGIN
      IF ((k <= N_f)  AND  (m <= N_f))  THEN
         IF  (m > k)  THEN Through :=  SQR(m+1)-k
                    ELSE  Through :=  SQR(k)+1+m  
      ELSE
         IF  (k > N_f)  AND  (m <= N_f)  THEN
             Through :=  SQR(N_f+1) + 2*(k-N_f-1)*N_f + k - N_f + m  
         ELSE  IF  (k <= N_f)  AND  (m > N_f)  THEN
                  Through := sqr(N_f+1) + 2*(m-N_f)*N_f + m - N_f - k   
           
   END; //........................................................  Through
В общем написал функцию но при запуске на делфи выдаёт ошибку :

Return value of function 'Through' might be undefined.

Подскажите пожалуйста где ошибка?

Вот ещё один вопрос свзанный с паскалем:

Xmax:= X_Node^[1];

Что означает это стрелочка вверх, если Xmax и X_Node это два массива.
Заранее спасибо.

Вернуться к обсуждению:
Функция выдает ошибку: "Return value of function 'Through' might be undefined" Delphi
1
Заказать работу у эксперта

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.10.2012, 16:11
Готовые ответы и решения:

Функция выдает ошибку: "Return value of function might be undefined"
Привет Всем! Вот написана функция : function SearchAndReplace( RE1: TRichEdit; SearchText,...

Выдает ошибку Return value of function
Создал модуль по примеру, добавил его в проект, но все равно выдает 2 ошибки: 1) Return value of...

Выдает такую ошибку. [Error] return-statement with a value, in function returning
return-statement with a value, in function returning 'void' Делаю программу для вычисления...

Выдает ошибку Fatal error: Call to undefined function getTableInfo()
Добрый вечер! С Новым Годом! Подскажите, пожалуйста.. Выдает ошибку Fatal error: Call to...

4
06.10.2012, 16:11
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.10.2012, 16:11
Помогаю со студенческими работами здесь

табуляция функция выдает E2268 Call to undefined function 'Tab'
в коде есть табуляция void __fastcall TForm1::Tab(float xn,float xk,float h) { float x,y;...

Выдает ошибку:Undefined function or method 'f' for input arguments of type 'double'
2 проблемы, использую мат лаб R2010b очень нужна помощь, заранее спасибо !!! люди, мне нужно...

MatLab выдает ошибку "Undefined function or method 'C_nel' for input arguments of type 'double' "
Помогите, пожалуйста, разобраться! MatLab выдает ошибку &quot;Undefined function or method 'C_nel' for...

Ошибка: Return value of function 'nez' might be undefined
помогите исправить. procedure TForm1.btn1Click(Sender: TObject); function nez(n:real) :real ;...

Ошибка Return value of function 'rec' might be undefined
Программа работает, выполняет все правильно, но пишет ошибки: Value assigned to 'sr' never used...

Функция выдает ошибку на "return"
Здравствуйте. Функция выдает ошибку на возврате значения: &quot;HEAP CORRUPTION DETECTED&quot;. При чем...

Функция на mysqli выдает ошибку Fatal error: Uncaught Error: Call to undefined method mysqli_stmt::get_result()
Здравствуйте, уважаемые форумчане! На OpenServer все работает, никаких ошибок. На хосте...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru