ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Получить из функции 2 выходных результата, возможно ли?!
57 сообщений из 57, показаны все 3 страниц
  все  
Получить из функции 2 выходных результата, возможно ли?!
    #39404571
venza
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
venza
Гость
Допустим есть функция
function abc(x,y:integer):integer;
result1:=(какие то расчеты по x);
result2:=(какие то расчеты по y);

Как на кнопку получить result1 и result2?
Как двумя отдельными функциями сделать я знаю.
...
Рейтинг: 0 / 0
15.02.2017, 08:28:11
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404574
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
Код: pascal
1.
2.
3.
4.
5.
procedure Some(var result1, result2: integer);
begin
  result1 := 1;
  result2 := 2;
end;
...
Рейтинг: 0 / 0
15.02.2017, 08:42:39
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404579
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Док
Участник
venza,
Код: pascal
1.
2.
3.
4.
5.
6.
function abc(out x,y:integer):integer;
begin
result:= some_result: 
x:=(какие то расчеты по x);
y:=(какие то расчеты по y);
end;


?
...
Рейтинг: 0 / 0
15.02.2017, 08:56:52
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404580
Gerasimenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gerasimenko
Участник
venza,

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
type
 myRec = record
  res1:Integer;
  res2:Real;
  res3:String;
  res4:TDateTime;
 end;

...

function myFunc:myRec;
...
...
Рейтинг: 0 / 0
15.02.2017, 08:59:53
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404619
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DimaBr
Участник
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
function SetButton(AButton: TButton; ACaption: string; R: TRect; OnClick: TNotifyEvent): boolean;
begin
  Result := Assigned(AButton);
  if not Result then Exit;
  AButton.Caption := ACaption;
  AButton.SetBounds(R.Left,R.Top,R.Right,R.Bottom);
  AButton.OnClick := OnClick;  
end;
...
Рейтинг: 0 / 0
15.02.2017, 10:27:31
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404620
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Maxim Rusov
Участник
В новых Delphi еще нельзя написать:

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
function MyFind :Boolean, Index;
begin
  return False, -1;
end

//...

Found, Index := MyFind;


?

Недоработка, я считаю.
...
Рейтинг: 0 / 0
15.02.2017, 10:28:19
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404626
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
Maxim RusovНедоработка, я считаю.
Где такое можно? И как такое использовать в условиях?
...
Рейтинг: 0 / 0
15.02.2017, 10:32:23
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404631
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
defecatorПривилегированный пользователь
Модератор форума
Maxim RusovВ новых Delphi еще нельзя написать:

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
function MyFind :Boolean, Index;
begin
  return False, -1;
end

//...

Found, Index := MyFind;


?

Недоработка, я считаю.

Да, нужно больше говнокода !
...
Рейтинг: 0 / 0
15.02.2017, 10:35:14
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404634
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Maxim Rusov
Участник
wadmanГде такое можно? И как такое использовать в условиях?
Да почти во всех современных языках. Например, поменять 2 переменные:

X,Y := Y,X;
...
Рейтинг: 0 / 0
15.02.2017, 10:38:34
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404638
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
Maxim RusovДа почти во всех современных языках.
В каких?
...
Рейтинг: 0 / 0
15.02.2017, 10:39:43
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404640
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Maxim Rusov
Участник
defecatorДа, нужно больше говнокода !
Ну так уже натащили всякой гадости, типа лямбд, чего уж...
...
Рейтинг: 0 / 0
15.02.2017, 10:39:55
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404642
Aleksandr Sharahov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksandr Sharahov
Участник
wadmanMaxim RusovНедоработка, я считаю.
Где такое можно? И как такое использовать в условиях?

А это еще одна недоработка )
...
Рейтинг: 0 / 0
15.02.2017, 10:41:14
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404643
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
defecatorПривилегированный пользователь
Модератор форума
Maxim RusovdefecatorДа, нужно больше говнокода !
Ну так уже натащили всякой гадости, типа лямбд, чего уж...
+100
и генериков
...
Рейтинг: 0 / 0
15.02.2017, 10:41:22
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404645
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Maxim Rusov
Участник
wadmanMaxim RusovДа почти во всех современных языках.
В каких?
Гугли "параллельное присваивание"
...
Рейтинг: 0 / 0
15.02.2017, 10:42:18
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404646
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
wadman
Участник
Maxim Rusovwadmanпропущено...

В каких?
Гугли "параллельное присваивание"
Ок.
...
Рейтинг: 0 / 0
15.02.2017, 10:44:22
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404652
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
Можно вернуть запись, а в ней - хоть 100500 полей.
...
Рейтинг: 0 / 0
15.02.2017, 10:49:35
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404657
Valery_B
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valery_B
Участник
Обычно, это имеет такой вид:
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Function Some(var S1, S2: String):Boolean;
begin
  S1 := 'Hello';
  S2 := ' World';
  Result:=True;
end;
...
var
 S1,S2:String;
begin
 If Some(S1, S2) then
  ShowMessage(S1+S2);
end;
...
Рейтинг: 0 / 0
15.02.2017, 10:52:48
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39404672
Cane Cat Fisher
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Cane Cat Fisher
Участник
Maxim Rusov
Код: pascal
1.
function MyFind :Boolean, Index;




Массив верни. Если разных типов, то variant.

А лучше record.
...
Рейтинг: 0 / 0
15.02.2017, 11:06:00
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405039
Фотография softwarer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
softwarer
Участник
wadmanГде такое можно? И как такое использовать в условиях?
Это из древнего Бейсика. Полная форма выглядела так:

Код: plaintext
LET A, B, C = 10

Оператор LET быстро стал необязательным, поэтому начали писать просто

Код: plaintext
A = 10
...
Рейтинг: 0 / 0
15.02.2017, 15:42:45
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405059
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Maxim Rusov
Участник
Не, параллельное присваивание - это другое. В общем случае допустимы такие фишки:

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
function GetSize :Integer, Integer;
begin
  return Width, Height;
end;

procedure SetSize(aWidth, aHeight :Integer)
begin
end;

CX, XY := GetSize;
SetSize( CX, CY ) ;

SetSize( GetSize ) ;
...
Рейтинг: 0 / 0
15.02.2017, 16:05:42
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405094
jmp_original
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
jmp_original
Гость
Maxim Rusov, ну, я погуглил "параллельное присваивание". Так всё-таки, в каких-нибудь языках, кроме Lua или Python (про которые мы говорить не будем, во избежание), это есть?
...
Рейтинг: 0 / 0
15.02.2017, 16:32:33
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405175
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Maxim Rusov
Участник
jmp_original...Так всё-таки, в каких-нибудь языках, кроме Lua или Python (про которые мы говорить не будем, во избежание), это есть?
Изучай: http://hyperpolyglot.org/
...
Рейтинг: 0 / 0
15.02.2017, 17:43:40
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405199
Adx
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Adx
Гость
В объектных языках параллельное присваивание - нонсенс. Нужно, как корове пятая нога.
Нужно вернуть набор данных? Верни объект. Вырожденные случаи возвращения integer x и y рассматривать смысла нет.
...
Рейтинг: 0 / 0
15.02.2017, 18:26:23
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405203
Фотография JayDi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
JayDi
Участник
Параллельное присваивание есть в том же джаваскрипте и называется Destructuring Assignment :

Код: javascript
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
var a, b, rest;
[a, b] = [10, 20];
console.log(a); // 10
console.log(b); // 20

[a, b, ...rest] = [10, 20, 30, 40, 50];
console.log(a); // 10
console.log(b); // 20
console.log(rest); // [30, 40, 50]

({a, b} = {a: 10, b: 20});
console.log(a); // 10
console.log(b); // 20
...
Рейтинг: 0 / 0
15.02.2017, 18:30:15
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405242
Фотография LocksmithPC
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LocksmithPC
Участник
JaDiПараллельное присваивание есть в том же джаваскрипте и называется Destructuring Assignment :

Код: javascript
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
var a, b, rest;
[a, b] = [10, 20];
console.log(a); // 10
console.log(b); // 20

[a, b, ...rest] = [10, 20, 30, 40, 50];
console.log(a); // 10
console.log(b); // 20
console.log(rest); // [30, 40, 50]

({a, b} = {a: 10, b: 20});
console.log(a); // 10
console.log(b); // 20



Матерь Б-жья, это за что их так?
...
Рейтинг: 0 / 0
15.02.2017, 19:47:57
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405247
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
Код: javascript
1.
2.
3.
4.
5.
6.
7.
[a, b] = [10, 20];
console.log(a); // 10
console.log(b); // 20

({a, b} = {a: 10, b: 20});
console.log(a); // 10
console.log(b); // 20



Можно было бы еще пару синтаксисов для одного и того же действия разрешить, к примеру:
Код: javascript
1.
2.
3.
|^|^|a, b|^|^| = |^|^|10, 20|^|^|;
console.log(a); // 10
console.log(b); // 20


чо

Впрочем, меня бы это всё равно не заинтересовало, и я продолжал бы писать
Код: javascript
1.
2.
a = 10;
b = 20;


И мне параллельно, что "не параллельно".
...
Рейтинг: 0 / 0
15.02.2017, 19:58:15
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405274
avlaxoft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
avlaxoft
Участник
Gerasimenko,

+++
...
Рейтинг: 0 / 0
15.02.2017, 21:06:25
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405312
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
defecatorПривилегированный пользователь
Модератор форума
LocksmithPCJaDiПараллельное присваивание есть в том же джаваскрипте и называется Destructuring Assignment :

Код: javascript
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
var a, b, rest;
[a, b] = [10, 20];
console.log(a); // 10
console.log(b); // 20

[a, b, ...rest] = [10, 20, 30, 40, 50];
console.log(a); // 10
console.log(b); // 20
console.log(rest); // [30, 40, 50]

({a, b} = {a: 10, b: 20});
console.log(a); // 10
console.log(b); // 20



Матерь Б-жья, это за что их так?
этого желают любители сраных генериков
...
Рейтинг: 0 / 0
15.02.2017, 22:28:59
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405357
Фотография kdv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kdv
Участник
defecator,

читаю, охреневаю, и вдруг думаю - что-то мне это напоминает. Показалось что mumps, но нет. Но вообще история интересная. В mumps присванивание
set a=5, b=6
дальше в языках программирования set (let) отвалился, стало
a=5
b=6
или
a=5, b=6
или
a:=5; b:=6;
теперь вдруг кому-то понадобилось "облегчить читаемость кода"
a, b = 5, 6

верной дорогой идете, товарищи! :-)
...
Рейтинг: 0 / 0
16.02.2017, 01:08:41
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405358
Фотография kdv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kdv
Участник
собственно, моя мысль проста. В команде разработчиков языков программирования обязательно должен быть хотя бы один ортодоксальный старый пердун, который будет вовремя бить киянкой по голове излишне ретивых придумщиков.
...
Рейтинг: 0 / 0
16.02.2017, 01:10:16
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405368
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
Заметно, что в записи

a=5,b=6

символов столько же, сколько и в

a,b=5,6

, но это не современно.
...
Рейтинг: 0 / 0
16.02.2017, 01:53:11
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405372
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
kdvсобственно, моя мысль проста. В команде разработчиков языков программирования обязательно должен быть хотя бы один ортодоксальный старый пердун, который будет вовремя бить киянкой по голове излишне ретивых придумщиков.Дурные идеи сами отомрут.
...
Рейтинг: 0 / 0
16.02.2017, 02:17:24
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405375
_Старый_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Старый_
Гость
rgreatДурные идеи сами отомрут.
Да. Но пер ортодокс гораздо эффективней.
...
Рейтинг: 0 / 0
16.02.2017, 04:29:48
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405388
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
makhaon
Участник
rgreat,

J# в IDE до сих пор боком вылазит.
...
Рейтинг: 0 / 0
16.02.2017, 07:15:49
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405520
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Док
Участник
makhaon,

+1
...
Рейтинг: 0 / 0
16.02.2017, 10:43:46
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405858
Фотография Maxim Rusov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Maxim Rusov
Участник
kdvсобственно, моя мысль проста. В команде разработчиков языков программирования обязательно должен быть хотя бы один ортодоксальный старый пердун, который будет вовремя бить киянкой по голове излишне ретивых придумщиков.
Вы просто не врубились, что это вообще такое.

X,Y := Y,X;

Красота! Что может быть элегантнее?
...
Рейтинг: 0 / 0
16.02.2017, 15:45:49
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405869
Aleksandr Sharahov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksandr Sharahov
Участник
встроенная Swap(X,Y)
...
Рейтинг: 0 / 0
16.02.2017, 15:53:50
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405879
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
Maxim RusovX,Y := Y,X;

Красота! Что может быть элегантнее?
Чес. говоря, за 15 лет работы ни разу мне не приходилось решать подобную задачу. В школе, 20 лет назад, вроде с такой сталкивался, на "алгоритмическом языке" на листе бумаги.
...
Рейтинг: 0 / 0
16.02.2017, 16:00:47
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405897
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
YuRockЧес. говоря, за 15 лет работы ни разу мне не приходилось решать подобную задачуДа ладно. Ни разу не приходилось менять переменные местами?
...
Рейтинг: 0 / 0
16.02.2017, 16:16:06
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405906
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
_Vasilisk_Да ладно. Ни разу не приходилось менять переменные местами?
Честно не помню такого. Может, забыл, конечно, но даже представить сложно, когда такое могло понадобиться. У каждого, конечно, свои предпочтения при построении алгоритмов...
...
Рейтинг: 0 / 0
16.02.2017, 16:22:21
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405911
Aleksandr Sharahov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksandr Sharahov
Участник
YuRock,

обошелся без пузырька?
...
Рейтинг: 0 / 0
16.02.2017, 16:25:21
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405914
Фотография JayDi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
JayDi
Участник
Дело не в замене переменных местами. Некоторые функции могут вернуть несколько результатов (например, код ошибки и ее текст). И для того, чтобы не плодить лишние объекты, как раз и используется возврат в виде "массива". Т.е. мы ожидаем от функции два результата:

Код: pascal
1.
resCode, resError := checkMyData();
...
Рейтинг: 0 / 0
16.02.2017, 16:28:22
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405921
Aleksandr Sharahov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksandr Sharahov
Участник
сахар
...
Рейтинг: 0 / 0
16.02.2017, 16:31:44
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405922
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
Aleksandr SharahovYuRock,

обошелся без пузырька?
А, да, точно
...
Рейтинг: 0 / 0
16.02.2017, 16:32:03
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405926
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
Aleksandr Sharahovобошелся без пузырька?
Но там не переменные переставляются местами, а элементы массива. Для сортировки, тут назначение понятно.
А вот поменять местами тобой же объявленные переменные... Такого не помню.
...
Рейтинг: 0 / 0
16.02.2017, 16:33:59
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405928
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
YuRockне переменные переставляются местами, а элементы массиваВ чем разница?
...
Рейтинг: 0 / 0
16.02.2017, 16:36:09
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405929
Фотография softwarer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
softwarer
Участник
JaDiНекоторые функции могут вернуть несколько результатов (например, код ошибки и ее текст).
В кривом дизайне и не такое возможно.
...
Рейтинг: 0 / 0
16.02.2017, 16:37:16
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405931
Aleksandr Sharahov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksandr Sharahov
Участник
YuRock,

границы отрезка, имя-фамилия, часто рекурсивные алгоритмы...
...
Рейтинг: 0 / 0
16.02.2017, 16:38:09
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405933
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
_Vasilisk_YuRockне переменные переставляются местами, а элементы массиваВ чем разница?
В том, что ты не полностью процитировал, добавлю окончание

YuRockА вот поменять местами тобой же объявленные переменные...
В случае с массивом такая переменная одна.
...
Рейтинг: 0 / 0
16.02.2017, 16:40:50
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405940
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
Aleksandr Sharahovграницы отрезка
Я люблю сразу инициализировать, так, как мне нравится: nStart и nEnd, nEnd >= nStart, и дальше не заморачиваться. А не вначале инициализировать, затем сделать проверку и переставить местами, если надо - не вижу смысла и профита.
Aleksandr Sharahovимя-фамилия
Тут как кому нравится. Мне, например, опять же больше нравится иметь неизменные FirstName и LastName, а затем
Код: pascal
1.
2.
3.
4.
if ... then
  Edit.Text := FirstName + ' ' + LastName
else
  Edit.Text := LastName + ' ' + FirstName;


чем поменять местами переменные по условию а затем их использовать.
Aleksandr Sharahovчасто рекурсивные алгоритмы...
не знаю
...
Рейтинг: 0 / 0
16.02.2017, 16:49:01
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405941
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
YuRockВ случае с массивом такая переменная одна.
Код: pascal
1.
2.
a[0] := 20;
a[1] := 10;


В каком месте она одна?
...
Рейтинг: 0 / 0
16.02.2017, 16:49:04
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405944
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
YuRock
Участник
_Vasilisk_В каком месте она одна?
вот в каком:
Код: pascal
1.
2.
var
  a: Array[ 0 .. 1 ] of Integer;
...
Рейтинг: 0 / 0
16.02.2017, 16:50:24
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39405949
чччД
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чччД
Участник
Вы че за фигню обсуждаете? 😎
...
Рейтинг: 0 / 0
16.02.2017, 16:56:50
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39406155
inoremap
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inoremap
Участник
kdvсобственно, моя мысль проста. В команде разработчиков языков программирования обязательно должен быть хотя бы один ортодоксальный старый пердун, который будет вовремя бить киянкой по голове излишне ретивых придумщиков.
https://gobyexample.com/multiple-return-values в команде разработчиков ортодоксы 80lv
...
Рейтинг: 0 / 0
16.02.2017, 20:45:55
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39566440
avlaxoft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
avlaxoft
Участник
wadman
Код: pascal
1.
2.
3.
4.
5.
procedure Some(var result1, result2: integer);
begin
  result1 := 1;
  result2 := 2;
end;



Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Type
  TIntArray = array of integer;
function Some: TIntArray;
begin
  SetLength(Result, 2);
  Result[0] := 1;
  Result[1] := 2;
end;
........
........
var
  LArray: TIntArray;
 ...
 LArray := Some;
 //LArray[0] = 1
 //LArray[1]  = 2
...
Рейтинг: 0 / 0
08.12.2017, 10:43:25
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39566472
Barlone
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Barlone
Участник
YuRock_Vasilisk_Да ладно. Ни разу не приходилось менять переменные местами?
Честно не помню такого. Может, забыл, конечно, но даже представить сложно, когда такое могло понадобиться. У каждого, конечно, свои предпочтения при построении алгоритмов...
Типа такого:
Код: pascal
1.
2.
3.
4.
5.
function gcd(a,b: integer):integer;
begin
  while b > 0 do b, a := a mod b, b;
  gcd := a;
end;

но нельзя, придется лишнюю переменную заводить.
...
Рейтинг: 0 / 0
08.12.2017, 11:25:18
| Ответить | Цитировать | Написать  
Получить из функции 2 выходных результата, возможно ли?!
    #39566474
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
defecatorПривилегированный пользователь
Модератор форума
BarloneYuRockпропущено...

Честно не помню такого. Может, забыл, конечно, но даже представить сложно, когда такое могло понадобиться. У каждого, конечно, свои предпочтения при построении алгоритмов...
Типа такого:
Код: pascal
1.
2.
3.
4.
5.
function gcd(a,b: integer):integer;
begin
  while b > 0 do b, a := a mod b, b;
  gcd := a;
end;


но нельзя, придется лишнюю переменную заводить.
и хорошо, что нельзя.
Иначе это даже хуже говнокода
...
Рейтинг: 0 / 0
08.12.2017, 11:28:43
| Ответить | Цитировать | Написать  
57 сообщений из 57, показаны все 3 страниц
  все  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Получить из функции 2 выходных результата, возможно ли?!
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?all=1&fid=58&tid=2041459]:
 0ms
get settings:
 4ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 23ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 46ms
get tp. blocked users:
 1ms
others: 187ms
total:  282ms
созд. / загр.: 282ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]