Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

help meee

Страницы: 1 2 >
Romm © (2007-04-14 17:42:00)
На этот раз не могу додуматься как осуществить проверку пароля, т.е.
Есть главная форма и форма проверки пароля. Как бы мне показать форму проверки пароля ДО появления главной формы??

если сделать так:
procedure TMainForm.FormShow(Sender: TObject); begin PasswordDlg.ShowModal; end;

то при вводе неправильного пароля делаю Application.Terminate ->> мерцание главной формы, которая появляется и тут же умирает...
Посоветуйте ченидь

Romm (2007-04-15 14:16:00) [1]

> Virgo_Style © (15.04.07 14:12) [28]

дык это так делается... а я то думал там... пасиб...

Virgo_Style (2007-04-15 14:12:00) [2]
ShellExecute(0,'open',' http://google.com',nil,nil,SW_SHOW); ShellExecute(0,'open','mailto:alhpa@beta.ru',nil,nil,SW_SHOW);

это запуск браузера и почтовика по умолчанию с соотв. параметрами. Но оформление ссылок - или сам, или [27].

Virgo_Style (2007-04-15 14:06:00) [3]
свяжись через пару лет.

Romm (2007-04-15 13:43:00) [4]
Покажи пожалуйста, как сделать ссылки скажем на www.delphimaster.ruи на отправку почты vasya_pupkin@mail.ru

Virgo_Style (2007-04-15 13:34:00) [5]
Romm © (15.04.07 13:29) [24]
Для этого пишется новый компонент или можно использовать TLabel??
Или так, или так.

Romm (2007-04-15 13:29:00) [6]
Мастера, во многих программах я видел ссылки на сайт, либо на отправку почты. Для этого пишется новый компонент или можно использовать TLabel??

Romm (2007-04-15 13:11:00) [7]

> вызвало проблему привведение типов

вызвало проблему не незнание способов применения, а непонимание происходящего, в общем неважно...

> много нового и неизвестного

например как изменять заголовок формы или надпись на кнопе? :))

> плакаться и давить на жалость

не было такого - это все Ваше воображение :))

> Невозможно изучить программирование пользуясь только форумом
зато можно узнать много нового и неизвестного...

Ну да ладно.. через пару лет свяжусь с Вами и покажу как я несвоим делом занимаюсь :))

Плохиш (2007-04-15 12:56:00) [8]

> как, если не на практике учиться програмировать?

Перед тем как применять на практики надо прочитать теорию, чтобы иметь представление о том, что пытаешься применять на практиике. А у тебя вызвало проблему привведение типов, которое, думаю, во всех существующих книгах на русском языке описано в первых разделах вместе с описанием типов. Но ты вместо того, чтобы прочитать об этом (кстати, паралельно мог бы узнать много нового и неизвестного), начал плакаться и давить на жалость.

PS. Невозможно изучить программирование пользуясь только форумом.

Romm (2007-04-15 12:51:00) [9]

> Плохиш © (15.04.07 12:46) [20]

дык вот я пытаюсь применить... Когда в школе учат делать проги типа "Hellow World", а хочется чего-то больше - делаешь что-то более сложное и интересное, в результате чего тебе говорят: "тебе рано, иди делай проги типа "Hellow World"".. вопрос: как, если не на практике учиться програмировать?

Плохиш (2007-04-15 12:46:00) [10]

> знаю!

Знания без применения - это бессмысленный груз...

Anatoly Podgoretsky (2007-04-15 12:46:00) [11]
> Romm (15.04.2007 12:16:14) [14]

Приведение(Тип)

Romm (2007-04-15 12:42:00) [12]

> Плохиш © (15.04.07 12:36) [16]

> Пора почитать раздел справкипо приведению типов.
подразумевается Help Delphi, который на АНГЛИЙСКОМ!
> не своим делом
зря...
> Ты и русского языка я гляжу не знаешь

ты много чего не знаешь...
> т.к. на русском выпущено большое количество книг по программированию
> и на делфи в частности.

знаю! и русский и про книги.

Romm (2007-04-15 12:38:00) [13]

> MessageBox(pchar('Неверынй пароль! Осталось '+IntToStr(5-
> num)+'
> попыток'),'Внимание',MB_OK);

Оооо спасиб.. А то куда я только этот pchar() не "совал" :))
> Сотри эту ересь.

млин, да этож шутка :)

Плохиш (2007-04-15 12:36:00) [14]

> Romm © (15.04.07 12:16) [14]
> из английского знаю только begin и end

Можешь дальше не продолжать, не интересно. Ну почему все кто занимается не своим делом всегда отсутствием знаний языка пытаются прикрыться? Ты и русского языка я гляжу не знаешь, т.к. на русском выпущено большое количество книг по программированию и на делфи в частности.

DrPass (2007-04-15 12:32:00) [15]

> MessageBox('Неверынй пароль! Осталось '+IntToStr(5-num)+'
> попыток','Внимание',MB_OK);

MessageBox(pchar('Неверынй пароль! Осталось '+IntToStr(5-num)+'
попыток'),'Внимание',MB_OK);

> у меня Delphi SP_Russia :)

Сотри эту ересь. От маминой сиськи ребенка пора отлучать

Romm (2007-04-15 12:16:00) [16]

> Пора

знаю

> почитать

из английского знаю только begin и end :))

пожалуста на русском примерчик :)

Плохиш (2007-04-15 12:09:00) [17]

> пишет о несоответствии типов string i PAniChar как-то так

Пора почитать раздел справки по приведению типов.

Romm (2007-04-15 11:32:00) [18]

> Странно, ни разу не встречал такого сообщения компилятора

у меня Delphi SP_Russia :) пишет о несоответствии типов string i PAniChar как-то так..

Плохиш (2007-04-15 11:27:00) [19]

> компилятор ругается. Не нравится емувот это место

Странно, ни разу не встречал такого сообщения компилятора.

Romm (2007-04-15 10:37:00) [20]
Еще вопрос:

procedure TPasswordDlg.OKBtnClick(Sender: TObject); var num:Integer; begin num:=0; if (PasswordEdit.Text=pass_1) or (PasswordEdit.Text=pass_2) or (PasswordEdit.Text=pass_3) then begin pas:=2; Close; end else begin pas:=1; if num<5 then begin inc(num); Application.MessageBox('Неверынй пароль! Осталось '+IntToStr(5-num)+' попыток','Внимание',MB_OK); end else Close; end; end;

компилятор ругается. Не нравится ему вот это место +IntToStr(5-num)+

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »