Начало   Правила Помощь Поиск Войти Регистрация  
Центр рейнджеров "Млечный путь"
 
26.09.2025 01:06:28
*
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости:
19.06.2023 12:12:17 - Форум ЕГ снова работает.
03.04.2020 10:16:49 - Ведётся подготовка к чемпионату "Механик"
31.05.2019 12:21:10 - ВНИМАНИЕ! ТЕМ КТО ХОЧЕТ ЗАРЕГИСТРИРОВАТЬСЯ НА ФОРУМЕ!
30.07.2018 01:30:46 - Флешмоб
24.04.2018 12:06:56 - Адрес Форума.



FAQ по тегам форума
FAQ по гильдиям
 
  Творчество Гильдии Команды ТР СНК Кланы Соревнования Рейтинги Альбомы Чат  
Страниц: 1 2 [3] 4 5
  Печать  
Тема: Паскаль
Значок "Грязный камикадзе" за третье место в викторине "Знаток истории форума Elemental Games"Орден Почетного Легиона за активное участие в жизни форума свыше 1000 дней!!!"Звезда Эгемона". Редчайшая награда Галактического Совета. Выдана за выдающиеся заслуги перед Форумом и за форумный стаж свыше 2000 дней
"Медаль Конгресса" — за долгий стаж на посту модератора форума, за терпение в борьбе со спамерами и за монотонный ежедневный труд по обновлению и поддержанию таблиц рейтингов и соревнований в надлежащем состоянии!"Красный пантеон" — за долгую и плодотворную работу в составе различных комиссий этого форума!"Ивикус" — за заслуги перед форумом!
Offline SergR
*

Сообщений: 6464
Карма: 628 Известность: 1114

« Ответ #30 : 23.03.2009 11:35:52 »
Логика и её законы, это преподавали, не?
Без понятия. Я ж говорю, классом ниже, мы проскочили. :)
Почётный орден "Звезда свободы" I-й степени за организацию разработки аддона "Революция", создание скриптов, моделирование и подбор наполненияOffline Ostap_Blender
*

Сообщений: 1425
Карма: 1490 Известность: 1351

« Ответ #31 : 24.03.2009 18:15:13 »
А вот у нас на уроках информатики учат форматировать дискеты...
Значок "Грязный камикадзе" за третье место в викторине "Знаток истории форума Elemental Games"Орден Почетного Легиона за активное участие в жизни форума свыше 1000 дней!!!"Звезда Эгемона". Редчайшая награда Галактического Совета. Выдана за выдающиеся заслуги перед Форумом и за форумный стаж свыше 2000 дней
"Медаль Конгресса" — за долгий стаж на посту модератора форума, за терпение в борьбе со спамерами и за монотонный ежедневный труд по обновлению и поддержанию таблиц рейтингов и соревнований в надлежащем состоянии!"Красный пантеон" — за долгую и плодотворную работу в составе различных комиссий этого форума!"Ивикус" — за заслуги перед форумом!
Offline SergR
*

Сообщений: 6464
Карма: 628 Известность: 1114

« Ответ #32 : 24.03.2009 18:20:52 »
А вот у нас на уроках информатики учат форматировать дискеты...
Серьёзно? :eek: Они ж используются только в ускоспециализированных устройствах.
"Орден Почётного Легиона" за активное участие в жизни форума свыше 1000 дней!!!"Песочный череп" знак вечного бана.
Offline Something
*

That's something... cute.
Сообщений: 3017
Карма: 290 Известность: 1772

« Ответ #33 : 24.03.2009 18:32:56 »
А вот у нас на уроках информатики учат форматировать дискеты...
Оу... А мы в Вакрафт учились играть. :p
"Символ Творца", почетная награда за создание новых медалей для форума ЕГ"Ашианская лента" за III место в конкурсе "На лучший рисунок корабля".Орден Почетного Легиона за активное участие в жизни форума свыше 1000 дней!!!
"Именная Монета" за создание и дальнейшую модернизацию полезнейшего трейнера, помогающего многим рейнджерам воплощать задуманное, видеть на несколько ходов вперед, еще больше чувствовать ту безграничную вселенную."Табель воина" - знак Чемпиона по КР 2 (версии 1.8.1)
Offline Нарком
*

Сообщений: 188
Карма: 205 Известность: 169

« Ответ #34 : 24.03.2009 19:21:41 »
А вот у нас на уроках информатики учат форматировать дискеты...
Лобзиком?
Почетный Орден  "Звезда Свободы" I-й степени за огромную работу по подготовке правительственных заданий для "КР2: Перезагрузка"Звезда героя, за выдающиеся заслуги перед форумом!"Ивикус" и почетное звание "Архивариус форума" — за проведение архивных исследований в области истории форума и кланов, а также создание ее обновляемых электронных версий и проявленное при этом трудолюбие и объективность.
Орден Галактического Совета - за создание пяти своих и доработку остальных правительственных заданий для патча КР!Орден Почетного Легиона за активное участие в жизни форума свыше 1000 дней!!!"Медаль Звездной Гвардии" за длительный стаж безукоризненной работы на благо форума.
Почётный орден "Звезда свободы" III-й степени за помощь в организации работы и создании скрипта для аддона "Революция""Звезда Эгемона". Редчайшая награда Галактического Совета. Выдана за выдающиеся заслуги перед Форумом и за форумный стаж свыше 2000 дней
Offline Axiton
*


Сообщений: 2165
Карма: 1550 Известность: 1737

« Ответ #35 : 26.03.2009 22:57:51 »
Как сделать, чтобы при вводе какого поля в базу данных, пользователь мог ввести только буквы? Например, чтобы вместо фамилии нельзя было цифры или спецсимволы записать?

Добавлено:
И как сделать, чтобы новый файл базы данных создавался не с заданным названием, а название вводилось с клавиатуры?
"Орден Почётного Легиона" за активное участие в жизни форума свыше 1000 дней!!!"Золотой Орден Галактического Совета" за большую работу в разработке, программировании аддона "КР HD: Революция".Offline Падшая шэдова
*

Сообщений: 410
Карма: 700 Известность: 497

« Ответ #36 : 27.03.2009 01:22:46 »
Базы данных в Паскале? А что за модуль используется?

В любом случае, придётся проверять ручками, удовлетворяет ли тебя введённое значение. Особого ("красивого и простого") на ограничение текущего ввода нет.
"Символ Творца", почетная награда за создание новых медалей для форума ЕГ"Ашианская лента" за III место в конкурсе "На лучший рисунок корабля".Орден Почетного Легиона за активное участие в жизни форума свыше 1000 дней!!!
"Именная Монета" за создание и дальнейшую модернизацию полезнейшего трейнера, помогающего многим рейнджерам воплощать задуманное, видеть на несколько ходов вперед, еще больше чувствовать ту безграничную вселенную."Табель воина" - знак Чемпиона по КР 2 (версии 1.8.1)
Offline Нарком
*

Сообщений: 188
Карма: 205 Известность: 169

« Ответ #37 : 27.03.2009 10:26:56 »
Axiton
У тебя (ща буду умничать ;)) неправильная постановка вопроса. Ввод данных в бд производится с помощью неких программных компонентов (напр. DBGrid, cxGrid), которые и определяют возможности обработки вводимых значений. Т.е. все зависит от того какой у тебя компонент и его версия. Без этого ничего сказать нельзя.
 
Про файл бд - тож самое. Все зависит только от типа бд (interbase, paradox, mssql, oracle...) который ты умолчал :)
 
 
Почетный Орден  "Звезда Свободы" I-й степени за огромную работу по подготовке правительственных заданий для "КР2: Перезагрузка"Звезда героя, за выдающиеся заслуги перед форумом!"Ивикус" и почетное звание "Архивариус форума" — за проведение архивных исследований в области истории форума и кланов, а также создание ее обновляемых электронных версий и проявленное при этом трудолюбие и объективность.
Орден Галактического Совета - за создание пяти своих и доработку остальных правительственных заданий для патча КР!Орден Почетного Легиона за активное участие в жизни форума свыше 1000 дней!!!"Медаль Звездной Гвардии" за длительный стаж безукоризненной работы на благо форума.
Почётный орден "Звезда свободы" III-й степени за помощь в организации работы и создании скрипта для аддона "Революция""Звезда Эгемона". Редчайшая награда Галактического Совета. Выдана за выдающиеся заслуги перед Форумом и за форумный стаж свыше 2000 дней
Offline Axiton
*


Сообщений: 2165
Карма: 1550 Известность: 1737

« Ответ #38 : 27.03.2009 19:26:59 »
А что за модуль используется?
Стандартные, crt и graph.

Особого ("красивого и простого") на ограничение текущего ввода нет.
А как сделать это "некрасиво"? :)

Про файл бд - тож самое. Все зависит только от типа бд (interbase, paradox, mssql, oracle...) который ты умолчал
Тема паскалю посвящена. :shy: Обычный файл данных, *.dat.

Ввод данных в бд производится с помощью неких программных компонентов
Единственный программный компонент - написанный на паскале файл exe. :) Указанные в скобках слова мне ни о чём не говорят. :(
"Орден Почётного Легиона" за активное участие в жизни форума свыше 1000 дней!!!"Золотой Орден Галактического Совета" за большую работу в разработке, программировании аддона "КР HD: Революция".Offline Падшая шэдова
*

Сообщений: 410
Карма: 700 Известность: 497

« Ответ #39 : 27.03.2009 20:08:19 »
Да, ты определённо имел ввиду "записи" (record).

А как сделать это "некрасиво"?
М... Как вариант - читаешь строку, введённую пользователем. Затем посимвольно её проверяешь (читай: пробегаешь строку в цикле до конца), входит ли каждый проверяемый символ в тот диапазон, куда входят просто числа. После первого несовпадения - выдаёшь ошибку и "не принимаешь" такой ввод. Если можно принимать знаковое число, то также можешь сделать допущение, что первый знак в строке - минус. Ну и если нужно число с точкой - то поэкспериментируй. Тоже посимвольная проверка. ;)
Почетный Орден  "Звезда Свободы" I-й степени за огромную работу по подготовке правительственных заданий для "КР2: Перезагрузка"Звезда героя, за выдающиеся заслуги перед форумом!"Ивикус" и почетное звание "Архивариус форума" — за проведение архивных исследований в области истории форума и кланов, а также создание ее обновляемых электронных версий и проявленное при этом трудолюбие и объективность.
Орден Галактического Совета - за создание пяти своих и доработку остальных правительственных заданий для патча КР!Орден Почетного Легиона за активное участие в жизни форума свыше 1000 дней!!!"Медаль Звездной Гвардии" за длительный стаж безукоризненной работы на благо форума.
Почётный орден "Звезда свободы" III-й степени за помощь в организации работы и создании скрипта для аддона "Революция""Звезда Эгемона". Редчайшая награда Галактического Совета. Выдана за выдающиеся заслуги перед Форумом и за форумный стаж свыше 2000 дней
Offline Axiton
*


Сообщений: 2165
Карма: 1550 Известность: 1737

« Ответ #40 : 27.03.2009 20:49:09 »
Падшая шэдова
Спасибо, попробую.

А по поводу ввода пользователем названия файла есть идеи?:)
"Орден Почётного Легиона" за активное участие в жизни форума свыше 1000 дней!!!"Золотой Орден Галактического Совета" за большую работу в разработке, программировании аддона "КР HD: Революция".Offline Падшая шэдова
*

Сообщений: 410
Карма: 700 Известность: 497

« Ответ #41 : 28.03.2009 00:04:31 »
Читаешь строку, введённую пользователем. Потом просто открываешь файл с таким именем. :)
 
var fname: string;
...
readln (fname);
assign (input, fname);
reset (input);
{так же делаем, когда нужно задать файл вывода... :)}
{при таком способе работы требуется проверять ошибки ввода/вывода, если {$I-}/{$I+} у тебя в конспектах не встречается - обращайся ;) }
...
close (input);
Значок Аарона Кинга за большой вклад в развитие форума, в частности за организацию и проведение конкурсов и чемпионатов!Орден Почетного Легиона за активное участие в жизни форума свыше 1000 дней!!!"Радужная сеелика" за высокую творческую активность.
"Красный пантеон" за плодотворную работу в составе Комиссии по Творческим Конкурсам!Переходящая "Некриловая шпилька" за третье место в "Кубке Цитаделей""Ивикус" — за заслуги перед форумом!
"Звезда Эгемона". Редчайшая награда Галактического Совета. Выдана за выдающиеся заслуги перед Форумом и за форумный стаж свыше 2000 дней"Орден Галактического Совета" за тестирование, реализацию новшеств и прочую помощь в разработке аддона "КР HD: Революция".
Offline RangerDimidr0
*

Сообщений: 2723
Карма: 1635 Известность: 2356

« Ответ #42 : 28.03.2009 09:35:57 »
readln (fname); assign (input, fname); reset (input); {так же делаем, когда нужно задать файл вывода... }

Только одно маленькое "но" для файла вывода: вместо reset(input) следует писать rewrite(output).
Хотя... не мне вам объяснять :)
"Орден Почётного Легиона" за активное участие в жизни форума свыше 1000 дней!!!"Золотой Орден Галактического Совета" за большую работу в разработке, программировании аддона "КР HD: Революция".Offline Падшая шэдова
*

Сообщений: 410
Карма: 700 Известность: 497

« Ответ #43 : 28.03.2009 23:37:02 »
Ну, само собой. :)
Почетный Орден  "Звезда Свободы" I-й степени за огромную работу по подготовке правительственных заданий для "КР2: Перезагрузка"Звезда героя, за выдающиеся заслуги перед форумом!"Ивикус" и почетное звание "Архивариус форума" — за проведение архивных исследований в области истории форума и кланов, а также создание ее обновляемых электронных версий и проявленное при этом трудолюбие и объективность.
Орден Галактического Совета - за создание пяти своих и доработку остальных правительственных заданий для патча КР!Орден Почетного Легиона за активное участие в жизни форума свыше 1000 дней!!!"Медаль Звездной Гвардии" за длительный стаж безукоризненной работы на благо форума.
Почётный орден "Звезда свободы" III-й степени за помощь в организации работы и создании скрипта для аддона "Революция""Звезда Эгемона". Редчайшая награда Галактического Совета. Выдана за выдающиеся заслуги перед Форумом и за форумный стаж свыше 2000 дней
Offline Axiton
*


Сообщений: 2165
Карма: 1550 Известность: 1737

« Ответ #44 : 29.03.2009 22:32:53 »
Читаешь строку, введённую пользователем. Потом просто открываешь файл с таким именем.
Благодарю. :) :yes: А как сделать, чтобы файл создавался с расширением .dat?
Страниц: 1 2 [3] 4 5
 
 

Powered by SMF 2.0 Beta 4 | SMF © 2006–2008, Simple Machines LLC
WAP2 RSS
Skin by [cer]
Страница сгенерирована за 0.037 секунд. Запросов: 62.

FRC | СВР | WR | LB | СБР | РБ | РДВ | АсТис | Авалон | СКР | FGC | КРУ | SLS | КЛАС