Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.08.05;
Скачать: [xml.tar.bz2];

Вниз

ПОМОГИТЕ ПОЖАЛУЙСТА, У МЕНЯ ЕСТЬ ЗАДАЧКА-НАДО СРОЧНО РЕШИТЬ   Найти похожие ветки 

 
OLEG.S   (2002-07-24 14:58) [0]

ЛЮДИ ДОБРЫЕ, ПОМОГИТЕ ПОЖАЛУЙСТА, У МЕНЯ ЕСТЬ ЗАДАЧКА-НАДО СРОЧНО РЕШИТЬ.
ЗАДАНИЕ:
ДАН ТЕКСТОВЫЙ ФАЙЛ, НАПРИМЕР:

10.52 162.58 9.71 ... 115.05 24 ИЮЛЯ 2002 Г.
11.65 118.46 8.54 ... 168.89 23 МАЯ 2002 Г.
.................................................
10.05 109.49 9.99 ... 109.54 15 МАРТА 2002 Г.

ЧИСЛА - ЦЕНА, А ДАТА - ДАТА ПОКУПКИ.

1 ВОПРОС:
КАК ДАННЫЙ ФОРМАТ ДАТЫ (15 МАРТА 2002 Г.) ПОМЕНЯТЬ НА ДД/ММ/ГГГГ (15/03/2002) И РЕЗУЛЬТАТ СОХРАНИТЬ В ДРУГОМ ТЕКСТОВОМ ФАЙЛЕ.
2 ВОПРОС:
КАК ИЗ ТЕКСТ. ФАЙЛА УДАЛИТЬ ОПРЕДЕЛЁННЫЙ СТОЛБЕЦ, ЕСЛИ ДАННЫЕ ИЗ ФАЙЛА ВЫВОДЯТСЯ В LISTBOX1, А НОМЕР УДАЛЯЕМОГО СТОЛБЦА ВВОДИТСЯ В EDIT1.

КСТАТИ, НАЧАЛЬНЫЙ ТЕКСТ. ФАЙЛ НЕ ИЗМЕНЯТЬ, НЕ ПЕРЕПИСЫВАТЬ НЕЛЬЗЯ. ВСЕ РЕЗУЛЬТАТЫ ДОЛЖНЫ СОХРАНЯТЬСЯ В ДРУГОМ ТЕКСТОВОМ ФАЙЛЕ.

ЗАРАНЕЕ БЛАГОДАРЕН, ЕСЛИ КТО ОТЗОВЕТСЯ ПОМОЧЬ РЕШИТЬ ПРОБЛЕМУ, ОЧЕНЬ НУЖНО!


 
Неместный   (2002-07-24 15:18) [1]

Мы сами не местные. Поможите кто чем может !
Научите читать книжки по программированию.


 
lenin   (2002-07-24 15:33) [2]

Вся задача сводится к работе со строками. Главное отыскать месио разделения столбцов, а это можно сделать использовав функцию pos


 
SuperIgor   (2002-07-24 15:35) [3]

Ответ на првый вопрос:
15 марта 2002 г. >>> 15/03/02
Можно сделать так.
Читаешь из файла подстроку "15 марта 2002 г."
15 так и оставляешь
2002 обрезаешь первые 2 символа
С месяцем сложнее. Сделай Файл данных типа...
Января 1
Февраля 2
...
Декабря 12

Потом читай из строки "15 марта 2002 г."
и подставлятй значения заместо Января --- 1 и т.д

2. Так тебе нужно удалить данные из файла или из ListBox1???




 
Просто так   (2002-07-24 17:08) [4]

if количество столбцов одинаково, сделать файл типа RECORD:
а дальше по делу.
if хорошо, тогда

...
const
ryadCount = 5; //количество столбцов - 1;
type
TCena = array[1..ryadCount] of real;

TMas = record
cena: TCena;
data: string[12];
end;

TForm1 = class(TForm)
...
end;

var
Form1: TForm1;
f: file of TMas;
mas: TMas;
...
implementation
...
mas.cena[i] //не писать в ListBox, - єл. нужн. СТОЛБЕЦА.
...
end.


 
vizier   (2002-07-24 17:39) [5]

как все запущено.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.08.05;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.005 c
3-13527
Fissher
2002-07-13 21:44
2002.08.05
BDE


1-13608
m66
2002-07-22 01:59
2002.08.05
Каким алгоритмом можно посчитать чило Пи с заданной точностью?


1-13675
иван
2002-07-23 16:44
2002.08.05
Консольное приложение


6-13764
OlegatoR
2002-05-12 17:56
2002.08.05
загрузить из инета только страницу без картинок


6-13762
PILESOSER
2002-05-22 18:01
2002.08.05
Программирование под Forex





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский