Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Показать сообщение отдельно
cjmaxik
1 / 1 / 0
Регистрация: 23.04.2011
Сообщений: 4
23.04.2011, 11:58  [ТС]

В десяти полях Edit переставить местами числа так, чтобы они были отсортированны по убыванию

23.04.2011, 11:58. Просмотров 1169. Ответов 6
Метки (Все метки)

Ответ

Цитата Сообщение от Zombi_sib Посмотреть сообщение
Может я не совсем понятно выразился чтоб подготовить типизированный числовой файл его надо создавать программно, а не руками.
Ладно, попробуем так) Спасибо)

Добавлено через 1 час 5 минут
Тогда еще вопрос - как мне переписать содержимое файла в другой, изменив его тип. Вот мой вариант, нерабочий:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
assignfile(infile,filename);
                 reset(infile);
                 assignfile(tempfile,'C:\temp.tmp');
                 while not eof(infile) do
                      begin
                           readln(infile, blabla);
                           blabla1:=strtofloat(blabla);
                           rewrite(tempfile);
                           write(tempfile, blabla1);
                      end;
                 closefile(infile);
                 closefile(tempfile);


Вернуться к обсуждению:
В десяти полях Edit переставить местами числа так, чтобы они были отсортированны по убыванию
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.04.2011, 11:58
Готовые ответы и решения:

В десяти полях Edit переставить местами числа так, чтобы они были отсортированы по убыванию.
В десяти полях Edit переставить местами числа так, чтобы они были отсортированы...

Значения переменных X, Y, Z поменять местами так, чтобы они оказались упорядоченными по убыванию
Значения переменных X, Y, Z поменять местами так, чтобы они оказались...

Значение переменных x,y,z поменять местами так, чтобы они оказались упорядоченными по убыванию
значение переменных x,y,z поменять местами так, чтобы они оказались...

Значение переменных поменять местами так, чтобы они оказались упорядоченными по убыванию
значение переменных X,Y,Z поменять местами так,чтобы они оказались...

Переставить строки матрицы так, чтобы элементы первого столбца были упорядочены по невозрастанию
Заданная матрица,Х(n,n),n<=20. Разработать программу, которая переставляет...

6
Другие темы раздела
Delphi Алгоритм бинарного поиска http://www.cyberforum.ru/delphi-beginners/thread281679.html
Поправте этот код: procedure TForm1.SpeedButton2Click(Sender: TObject); var i:integer; begin for i := 1 to SIZE do begin randomize; a := RandomRange(1, 50); end;end;
Delphi Музыка через полиморфизм Как можно проигрывать музыкальные файлы используя полиморфизм? Есть кусочек от всего кода как раз для использования полиморфизма, но как его обыграть не знаю. unit Unit1; interface uses http://www.cyberforum.ru/delphi-beginners/thread281676.html
OleContainer Delphi
Доброго времени суток! Подскажите пожалуйста, как в OleContainer засовывать формулы, построково считывая их из Word документа! Заранее благодарен!
Delphi При вводе даты рождения вывести восточный и западный гороскопы
Написать программу, которая при вводе даты рождения пользователем выводила бы его восточный и западный гороскопы с краткой характеристикой и рисунками. При этом дату рождения пользователь мог бы...
Delphi Delfi http://www.cyberforum.ru/delphi-beginners/thread281647.html
помогите плизззз
Delphi сохранение в юникоде добрый вечер. не подскажите как можно сохранить текстовую информацию из tntmemo в текстовом файле(*txt). который будет сохранятся с юникодом? заранее спасибо подробнее
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru