Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi для начинающих

Войти
Регистрация
Восстановить пароль
 
ящюр
97 / 97 / 24
Регистрация: 15.03.2013
Сообщений: 521
Записей в блоге: 1
#1

Функция и массив типа стринг - Delphi

01.12.2014, 15:58. Просмотров 208. Ответов 0
Метки нет (Все метки)

Народ может я чего не так делаю с массивом строк, может он как-то по ссылке должен передаваться или ещё чего.

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
type StringArray_= array of string;
.....
 
function ArraySort (strmassive: StringArray_) : StringArray_;   overload;
 var s:string;
 good: boolean;
 a:Integer;
 begin
 s:='';
 good:=True;
 if    (Length(strmassive)<2) then good:= False;
 while(good) do begin
            good:=False;
     for  a:= 0 to (Length(strmassive)-2)  do
               if (strmassive[a]>strmassive[a+1])   then begin
                  s:=  strmassive[a+1];
                  strmassive[a+1]:=strmassive[a];
                  strmassive[a]:=s;
                  good:= True;
               end; // if
        end;    // for  a:= 0 to Length(strmassive)  do
 
      end;   // while(good) do begin
 
      Result:=strmassive;
 
  end;  // function ArraySort
Ругается на предпоследнюю строчку.

Delphi
1
Result:=strmassive;
Пишет типа Declaration expected but identifair "Result" found

Подобный же метод с array of integer работает прекрасно.

И ёще вопросик. Для перегрузки методов\функций достаточно просто написать overload?

Добавлено через 12 минут
тьфу....забыл begin после for написать =(
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.12.2014, 15:58
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Функция и массив типа стринг (Delphi):

Найти номер позиции первой литеры строки типа стринг, не являющейся буквой... - Delphi
Напишите функцию nonalpha которая получает параметр str типа string и возвращает номер позиции его первой литеры, не являющейся буквой (как...

стринг гирд и двумерный массив - Delphi
Уважаемые форумчане, прошу совета : у меня есть матрица в виде Stringgird1 как мне получить Stringgird2 в котором будут в каждой...

Написать функцию целого типа, принимающую параметр – массив. Функция считает и возвращает среднее арифметическое элементов массива. В вызывающей - Delphi
Написать функцию целого типа, принимающую параметр – массив. Функция считает и возвращает среднее арифметическое элементов массива. В...

Написать функцию целого типа, принимающую параметр – массив. Функция считает и возвращает сумму элементов массива. В вызывающей программе прочит - Delphi
Написать функцию целого типа, принимающую параметр – массив. Функция считает и возвращает сумму элементов массива. В вызывающей программе...

Как записать в массив типа variant значение типа double? - Delphi
Есть массив массивов типа variant. В первой ячейке (элементе) текст, в остальных 4 нули. Текст-1 0 0 0 0 С массивом, 3 ячейками...

функция типа boolean - Delphi
вообщем есть функция function Valid: Boolean;в конце функции result становится либо true либо false. При нажатии на кнопку как проверить...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.12.2014, 15:58
Привет! Вот еще темы с ответами:

Делфи стринг - Delphi
Здравствуйте,подскажите пожалуйста как подсчитать в стринггриде сумма значений в строке и их среднее значение , и вывести это в другой...

Написать в стринг - Delphi
Нужно написать в Label1.Caption:='can't'; Но само слово имеет апостроф, &quot; can't &quot; , как его записать? Так &quot; правильно?

Парсинг и добавление в стринг - Delphi
Всем привет, я парсю страницу, и я хочу пропарсить html фаил и найдя нужное слово в html файле на сайте http://123.ru/1.html добавить...

Есть ли в Дельфи функция типа таймера, которая может задавать задержку с точностью до микросекунд? - Delphi
Есть ли в дельфи функция типа таймера которая может задавать задержку с точностью до микросек.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru