VPF::Помогите найти ошибку.... - Форум программистов

baksik99

Дата 12.11.2013, 22:07 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 4
Регистрация: 12.11.2013

Репутация: -1
Всего: -1

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

Код


procedure TForm1.btn1Click(Sender: TObject);
var
 Data: TStringlist;
 HTML, go: string;
 Pars1, Pars2: string;
 begin
   go:='http://тут ссылка';
   Data:=TStringlist.Create;
   Data.Add('user(login)='+ Edt1.Text);
   Data.Add('user(pass)='+ Edt2.Text);
   Data.Add('user(submit)=Войти');
   HTML:=IdHTP1.Post(go, data);
   Memo1.Lines.Add('HTML');

Добавлено через 4 минуты и 43 секунды
Выводит снизу такие ошибки:
[Hint] Unit1.pas(35): Variable 'Pars1' is declared but never used in 'TForm1.btn1Click'
[Hint] Unit1.pas(35): Variable 'Pars2' is declared but never used in 'TForm1.btn1Click'

Illusion Dolphin

Дата 12.11.2013, 22:13 (ссылка)

(голосов:3)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1198
Регистрация: 3.5.2003

Репутация: 36
Всего: 63

Если у вас какая-то ошибка, то попробуйте что-то исправить.

P.S. Сорри если что - не сдержался smile

Текст ошибки и строку с ошибкой можете предоставить?

--------------------

В мире всего две бесконечности: вселенная и человеческая глупость... На счёт вселенной я не уверен.
Шифрование и организация фотографий - Photo Database 4.5

baksik99

Дата 12.11.2013, 22:19 (ссылка)

(голосов:1)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 4
Регистрация: 12.11.2013

Репутация: -1
Всего: -1

[Hint] Unit1.pas(35): Variable 'Pars1' is declared but never used in 'TForm1.btn1Click'
[Hint] Unit1.pas(35): Variable 'Pars2' is declared but never used in 'TForm1.btn1Click'

Illusion Dolphin

Дата 12.11.2013, 22:22 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1198
Регистрация: 3.5.2003

Репутация: 36
Всего: 63

Вам для просветления ссылка http://translate.google.com/#en/ru/Hint
И ещё сюда вам нужно обратиться http://forum.vingrad.ru/forum/topic-353769.html
Телепатов тут нету, если вы не можете ошибку времени выполнения от замечания компилятора отличить, то я бы вам посоветовал прочитать хотя бы основы.

Это сообщение отредактировал(а) Illusion Dolphin - 12.11.2013, 22:30

--------------------

baksik99

Дата 12.11.2013, 22:24 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 4
Регистрация: 12.11.2013

Репутация: -1
Всего: -1

Мда.....спасибо за помощь....зря с вами ток время потерял....сам разберусь!

Добавлено через 55 секунд
Флудом ток занимаетесь!

Poseidon

Дата 12.11.2013, 22:58 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 53
Всего: 133

baksik99, где ошибка? Написано же Hint. Удали обьявление переменных Pars1 и Pars2 из btn1Click (пятая строчка в твоем коде выше) и будет тебе счастье. А еще вот:
Модератор: Название темы должно отражать ее суть!

--------------------

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

Anakin

Дата 15.11.2013, 15:14 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 192
Регистрация: 25.9.2006

Репутация: нет
Всего: нет

Цитата(baksik99 @ 12.11.2013, 22:19)

[Hint] Unit1.pas(35): Variable 'Pars1' is declared but never used in 'TForm1.btn1Click'
[Hint] Unit1.pas(35): Variable 'Pars2' is declared but never used in 'TForm1.btn1Click'

Вообще то это не ошибка, это подсказка, и она говорит о том что объявленные вами переменные нигде
не используются.
Как сказали выше ребята тут нету телепатов, покажите какая ошибка выходит при нажатии на кнопку.
И для начала Снифером посмотрите какие результаты идут при отправки данных через браузер и потом просмотрите что отправляет ваша программа дальше сравните и исправьте.

Данкинг

Дата 16.11.2013, 15:00 (ссылка)

(голосов:1)

Загрузка ...

Yersinia pestis

Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 9
Всего: 130

Если судить по куску приведённого когда - то для исключения ошибки в конец нужно поставить end; smile

--------------------

There's nothing left but silent epitaphs.

Akella

Дата 18.11.2013, 09:55 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329

Цитата(baksik99 @ 12.11.2013, 22:07

)

Выводит снизу такие ошибки:

Цитата(baksik99 @ 12.11.2013, 22:07

)

Hint

тебе ссылку на переводчик подарить? лови: http://translate.yandex.ua/

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »