Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 5 499

/ вопрос открыт /

Приветствую, уважаемые эксперты!
А вот и сама форма клиента , я добавил ее специально потому что думаю что возможно вам так будет проще (?))

К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)

Моисеев Евгений Леонидович Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: Моисеев Евгений Леонидович (статус: Посетитель)
Вопрос отправлен: 13 июля 2011, 15:45
Состояние вопроса: открыт, ответов: 0.


Мини-форум вопроса

Всего сообщений: 44; последнее сообщение — 13 июля 2011, 21:47; участников в обсуждении: 6.

Страницы: [« Предыдущая] [1] [2] [3] [Следующая »]

min@y™

min@y™ (статус: Доктор наук), 13 июля 2011, 18:17 [#21]:

Цитата (Моисеев Евгений Леонидович):

А сбросить сюда код всего проекта ... ну как-то у меня нет желания :) Если только кому-нибудь из вас скинуть за архивированные исходники на мыло или например в агент (я аськой просто не пользуюсь) поскольку обсуждение 2-3х юнитов боюсь не входит в рамки данного форума :)

Ты учишься на программиста?! Уже на третьем курсе???!!!!1111 Вот это дааааааааааа..... Тогда ты должен тут вопросы не задавать, а отвечать на них.
Смотреть твои исходники я не буду, мне страшно за свою психику. Мне твоих Unit1...Unit17 хватило, спасибо, но нуегонах.

З.Ы. Так и хочется взять красную ручку и исправлять, исправлять, исправлять ошибки в твоих сообщениях...
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
min@y™

min@y™ (статус: Доктор наук), 13 июля 2011, 18:18 [#22]:

Цитата (Gooddy):

Я вон с 2007 года сюда свой говнокод заливал и ничего. Даже матом не ругался никто =).

Ошибаешься! Матом все ругались, глядя в монитор. Причём вслух и громко!
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Gooddy

Gooddy (статус: 3-ий класс), 13 июля 2011, 18:22 [#23]:

min@y™: я имею ввиду в открытую меня никто не послал. Кто-то помог, кто-то промолчал.
Чисти код! Чисти код! Чисти код!
min@y™

min@y™ (статус: Доктор наук), 13 июля 2011, 19:04 [#24]:

Цитата (Gooddy):

я имею ввиду в открытую меня никто не послал. Кто-то помог, кто-то промолчал. Чисти код! Чисти код! Чисти код!

Повезло. Тут иногда такие черти заходят, что хочется взять и у...бать. А ты ещё ничего, адекватен.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Gooddy

Gooddy (статус: 3-ий класс), 13 июля 2011, 19:30 [#25]:

Меня вон например аристотель удивляет своими вопросами, но даже если он меня выведет максимум - пошлю его в библиотеку. Ну а автор этого вопроса знает основы языка, просто не знает правил хорошего кода.
Чисти код! Чисти код! Чисти код!
Моисеев Евгений Леонидович

Моисеев Евгений Леонидович (статус: Посетитель), 13 июля 2011, 19:38 [#26]:

https://www.delphi-int.ru/code/1968a6dd Сам браузер
юниты 2-7 , если будут вопросы по мере доработки то обращусь
8 - сканер портов https://www.delphi-int.ru/code/d11fe7bb
9 - программа для работы с почтой
https://www.delphi-int.ru/code/fea9aec7
10 - whois сервис https://www.delphi-int.ru/code/fd2c0078
11 - сервер программы удаленного администрирования https://www.delphi-int.ru/code/fca0d4e4
12 - уже знакомый вам клиент https://www.delphi-int.ru/code/37e46b58
13 - медиаплеер https://www.delphi-int.ru/code/b38d9648
14 - 92EE2E1A (небольшое окно вылетающее "в качестве приветствия" при запуске плеера (его код я не трогал - только подписался в лейблах))
15 небольшой прикол (невыключаемая виндовс) https://www.delphi-int.ru/code/32bd4a61
16- https://www.delphi-int.ru/code/e9185d09 "бешеная мышь"
17 - программка "голодный сидиром" https://www.delphi-int.ru/code/4d75e69f
min@y™

min@y™ (статус: Доктор наук), 13 июля 2011, 19:39 [#27]:

Цитата (Gooddy):

автор этого вопроса знает основы языка

Уверен?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Моисеев Евгений Леонидович

Моисеев Евгений Леонидович (статус: Посетитель), 13 июля 2011, 19:40 [#28]:

Простите что так долго провозился - просто пока все добавил )
min@y™

min@y™ (статус: Доктор наук), 13 июля 2011, 19:44 [#29]:

Цитата (Моисеев Евгений Леонидович):

https://www.delphi-int.ru/code/1968a6dd Сам браузер

Браузер! Нет, не так - БРАУЗЕР!!! 278 строк, из которых около 100 - описание класса формы. ГЕНИАЛЬНО! Создатели FireFox, Opera и Google Chrome нервно курят в углу, грызут ногти и пьют самогон.

Смотрим дальше...
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Аксион

Аксион (статус: 4-ый класс), 13 июля 2011, 19:46 [#30]:

Даже я такого не мутил =D
Моисеев Евгений Леонидович

Моисеев Евгений Леонидович (статус: Посетитель), 13 июля 2011, 19:46 [#31]:

min@y , объясните пож-та почему вы думаете что я не могу писать программы на делфи ? Я могу их писать , просто что-то получается , а что-то нет . Но это не значит что я не умею вообще их писать .
Моисеев Евгений Леонидович

Моисеев Евгений Леонидович (статус: Посетитель), 13 июля 2011, 19:47 [#32]:

ну как сделал , так сделал - зачем к строкам придираться ?
Моисеев Евгений Леонидович

Моисеев Евгений Леонидович (статус: Посетитель), 13 июля 2011, 19:48 [#33]:

вернее к их количеству ...
bugmenot

bugmenot (статус: 3-ий класс), 13 июля 2011, 19:51 [#34]:

УЖОС!
виконання програми розпочинається з того самого мiсця, де призупинилося.

min@y™

min@y™ (статус: Доктор наук), 13 июля 2011, 19:51 [#35]:

Сканер портов - ШЫДЭВР!

Цитата (Моисеев Евгений Леонидович):

объясните пож-та почему вы думаете что я не могу писать программы на делфи ? Я могу их писать , просто что-то получается , а что-то нет . Но это не значит что я не умею вообще их писать .


Вот поэтому я так думаю:

procedure TForm8.Button1Click(Sender: TObject);
 var
  i:Integer;
  ip:String;
begin
 ip:='127.0.0.1'; // Ну и нахрена это присваивание?
  if not InputQuery('Attention','Enter IP-address',ip) then exit; // а если я введу 192.168.1.256, тогда шо?
  for i:=StrToInt(Edit1.Text) to StrToInt(Edit2.Text) do // ну где обработка ввода неверных данных 
  // и диапазона портов?!!1
  begin
    TcpClient1.RemotePort:=IntToStr(i); //Устанавливаем порт
    TcpClient1.Open; // Где обработка ошибок соединения???
    if TcpClient1.Connected then Memo1.Lines.Add(IntToStr(i)+' open'); //Если удалось, то сообщаем об этом
    TcpClient1.Close; //Закрываем порт.
  end;
end;

Другие модули смотреть не буду, нервы дороже.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
min@y™

min@y™ (статус: Доктор наук), 13 июля 2011, 19:56 [#36]:

Цитата (Моисеев Евгений Леонидович):

ну как сделал , так сделал

Кстати, почему ты игноришь мои сообщения касательно дефолтных имён модулей и переменных?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
min@y™

min@y™ (статус: Доктор наук), 13 июля 2011, 19:59 [#37]:

Программы-приколы подчистую ©пёрты из интернета. Тебе не стыдно?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
bugmenot

bugmenot (статус: 3-ий класс), 13 июля 2011, 20:00 [#38]:

это небось копипаста из говнокнижки Флёнова
виконання програми розпочинається з того самого мiсця, де призупинилося.

Моисеев Евгений Леонидович

Моисеев Евгений Леонидович (статус: Посетитель), 13 июля 2011, 20:02 [#39]:

Я не игнорирую ваши сообщения касательно дефолтных имен модулей в своих программах , на этот счет я вам ответил в другом свом вопросе
min@y™

min@y™ (статус: Доктор наук), 13 июля 2011, 20:07 [#40]:

Цитата (Моисеев Евгений Леонидович):

на этот счет я вам ответил в другом свом вопросе

Я видел и даже ответил там на твоё сообщение.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!

Страницы: [« Предыдущая] [1] [2] [3] [Следующая »]

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 25 апреля 2026, 21:45
Выполнено за 0.03 сек.