Вопрос № 93716: Здравствуйте, уважаемые эксперты! Интересуют три вопроса:
1) Имеется TEdit. Как его содержимое проверять на формат даты? Т. е. если не дата введена, то showmessage?
2) Имеется TEdit. Каким образом можно ограничить количество вводимых знаков д...Вопрос № 93753: Доброе утро Уважаемые эксперты.
У меня на форме есть TChart. Как можно построить график функции, значения которой записаны в массив, а по оси X необходимо отобразить текущее время....Вопрос № 93760: Подскажите пожалуйста, как установить компонент QReport в Delphi7? Нужный файл я нашла в каталоге /bin, а как его инсталлировать? С редактором отчетов RaveReports меня не сложилось, он не понимает русские буквы :(...Вопрос № 93766: Здравствуйте!
У меня возникла такая проблема:
Я пишу маленькую программку которая меняет обои на рабочем столе,это
работает.Я также захотел сделять изменяемый цвет фона рабочего стола,
нашЈл ключ в реестре который отвечает за цвет(c...Вопрос № 93809: уважаемые эксперты подскажите пожалуйста можно ли дельфийскими средствами поставить пароль на папку?...
Вопрос № 93.716
Здравствуйте, уважаемые эксперты! Интересуют три вопроса:
1) Имеется TEdit. Как его содержимое проверять на формат даты? Т. е. если не дата введена, то showmessage?
2) Имеется TEdit. Каким образом можно ограничить количество вводимых знаков до цифр 1,2,..,9,0, и причём чтобы вводимое число не начиналось с нуля?
3) Подскажите диапазон значений integer.
Заранее благодарен!
Отправлен: 03.07.2007, 01:35
Вопрос задал: LogrusEx (статус: 10-ый класс)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 5)
Отвечает: Coupler
Здравствуйте, LogrusEx! 1) Проверка на формат даты:
if not TryStrToDate(edit1.Text, Time) then
showmessage ('Не может быть пробразовано в дату.'); 2) Напишите в обработчике Edit1KeyPress:
case key of
'0': if edit1.Text = '' then key := #0;
'1'..'9': ;
#8: ;
else
key := #0;
end; 3) Диапазон - -32768 .. 32767 -2147483648..2147483647 (см. справку Delphi) [Denisss] .
Ответ отправил: Coupler (статус: Практикант)
Ответ отправлен: 03.07.2007, 05:51 Оценка за ответ: 5 Комментарий оценки: Большое спасибо! Всё понятно и всё получилось!
Отвечает: Фадеев Юрий
Здравствуйте, LogrusEx!
Начну с 3) диапазона значений integer: -2147483648..2147483647
2)Чтобы ограничить количество вводимых знаков необходимо в свойстве TEdit MaxLength установить значение количества знаков.
3)Для даты я бы использовал не TEdit, а например DateTimePicker или чтото похожее с других компонентов (например Raize, TMS), ну или хотя бы MaskEdit.
Ответ отправил: Фадеев Юрий (статус: 2-ой класс)
Ответ отправлен: 03.07.2007, 08:44 Оценка за ответ: 5 Комментарий оценки: Спасибо! Вот только есть один нюанс: 2) я имел ввиду, чтобы в Едит можно было вводить только конкретные знаки, а в данном случае - цифры!
Вопрос № 93.753
Доброе утро Уважаемые эксперты.
У меня на форме есть TChart. Как можно построить график функции, значения которой записаны в массив, а по оси X необходимо отобразить текущее время.
Отправлен: 03.07.2007, 11:05
Вопрос задал: Bmb1958 (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Примак Руслан Николаевич
Здравствуйте, Bmb1958!
Например, у TFastLineSeries есть метод AddArray - единственное ограничение массив должен быть array of Double.
В дизайнере TChart Chart->Series->Add->Fast Line.
Рядом с закладкой Chart появится закладка Series
Перейти на закладку Series, в ней на General и для BottomAxis Установить флажок DateTime.
Ответ отправил: Примак Руслан Николаевич (статус: 3-ий класс)
Ответ отправлен: 03.07.2007, 13:20
Вопрос № 93.760
Подскажите пожалуйста, как установить компонент QReport в Delphi7? Нужный файл я нашла в каталоге /bin, а как его инсталлировать? С редактором отчетов RaveReports меня не сложилось, он не понимает русские буквы :(
Отправлен: 03.07.2007, 11:42
Вопрос задала: Mammka (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Denisss
Здравствуйте, Mammka!
Меню Component - Install packages.... Здесь жмете кнопку "Add..." и указываете нужный пакет (если я не ошибаюсь, то это файл dclqrtX0.bpl, где X - номер версии Delphi).
Удачи!
Ответ отправил: Denisss (статус: Профессионал) Россия, Москва WWW:Хлама много, по сути ничего... ---- Ответ отправлен: 03.07.2007, 11:59 Оценка за ответ: 5
Вопрос № 93.766
Здравствуйте!
У меня возникла такая проблема:
Я пишу маленькую программку которая меняет обои на рабочем столе,это
работает.Я также захотел сделять изменяемый цвет фона рабочего стола,
нашЈл ключ в реестре который отвечает за цвет(control
panelcolorsackground)и меняю его значение на нужный мне цвет, но всЈ
дело в том что изменения вступают в силу только после перезагрузки:(
Пробовал "сказать" системе чтоб она перечитала параметр(SendMessage,
SystemParamInfo), но не получилось,Подскажите пожалуста как это можно
сделать
Отправлен: 03.07.2007, 12:45
Вопрос задал: Stari (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 3)
Отвечает: PGM
Здравствуйте, Stari!
Попробуйте так (у меня работает, задача была та же :) + еще замена шелла совсем)
procedure UpdateShellBackground;
var NewColor : array[1..1] of Integer;
begin
...
NewColor[1] := COLOR_BACKGROUND;
SetSysColors(1, NewColor, AColor);
Application.ProcessMessages;
...
end;
Ответ отправил: PGM (статус: 8-ой класс)
Ответ отправлен: 03.07.2007, 20:22
Вопрос № 93.809
уважаемые эксперты подскажите пожалуйста можно ли дельфийскими средствами поставить пароль на папку?
Это возможно только в том случае, если Ваша программа будет постоянно выполняться (находиться в ОЗУ со вусеми вытекающими отсюда последствиями). Пароли, поставленные с использованием средств операционных систем Windows 2000 и старше (насколько мне известно, таковые имеются), приведут к несовместимости папок и информации на дисках с другими ОС или, возможно, их можно будет обойти без пароля. Иными словами, защищать можно, но защитить нельзя. Как, впрочем, и любую другую информацию.
С уважением, DimonSoft.
Ответ отправил: DimonSoft (статус: 2-ой класс)
Ответ отправлен: 03.07.2007, 22:09
Отвечает: Левадный Тимур Русланович
Здравствуйте, Ботвана Василий!
Я понимаю, что это не ответ на ваш вопрос но ... , пароль без труда можно поставить на архив.
