Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
 
skyter789
0 / 0 / 1
Регистрация: 05.01.2015
Сообщений: 80
1

Авторизация на Delphi

10.02.2016, 20:20. Просмотров 443. Ответов 20
Метки нет (Все метки)

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
unit Unit1;
 
interface
 
uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, IdBaseComponent, IdComponent,
  IdTCPConnection, IdTCPClient, IdHTTP, Vcl.StdCtrls, sButton, sEdit;
 
type
  TForm1 = class(TForm)
    sEdit1: TsEdit;
    sEdit2: TsEdit;
    sButton1: TsButton;
    idHTTP1: TIdHTTP;
    procedure sButton1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.sButton1Click(Sender: TObject);
var
data: tstringlist;
begin
data:=Tstringlist.create;
     data.Add('username'+sedit1.Text);
     data.Add('password='+sedit2.Text);
     try
      idHTTP1.Post('http://informatika.edu.az', data);
     except
      if Pos(sedit1.text, idHTTP1.Response.RawHeaders.Text)<>0 then
      showmessage('Yeeeah')
      else
      showmessage('Noooo :(');
     end;
end;
 
end.
Даже сообщение не появляется . Что же делать?
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.02.2016, 20:20
Ответы с готовыми решениями:

Авторизация в Delphi
как в делфи сделать если пользователь ввёл правильно логин и пароль при нажатии...

Авторизация на сайте в Delphi
Всем привет, вот у меня возникла проблема.. При вводе верных данных пишет...

Что лучше брать Delphi XE2, Delphi XE, Delphi 7?
Привет форумчане! У меня вопрос: что лучше брать Delphi XE2, Delphi XE, Delphi...

Какие отличия Delphi 5, Delphi 6 и Delphi 7
Кто-нибудь юзал Delphi 6? Если да, то напишите, плиз, его отличия от 5-ой...

ZipForge для Delphi Xe - интерфейс стал выглядеть как в Delphi 2007
Народ!!! Помоготи!!! Установил компонент ZipForge для Delphi Xe и после этого...

20
skyter789
0 / 0 / 1
Регистрация: 05.01.2015
Сообщений: 80
10.02.2016, 22:29  [ТС] 21
Спасибо, исправил всё, отлишно работает)
0
10.02.2016, 22:29
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.02.2016, 22:29

где найти delphi c компилятором? и с чего начинать программирование в delphi?
здравствуйте, вот начинаю изучать delphi с чего начинать лучше?

Почему функция работающая в Delphi 7 не работает в Delphi 2007 и в 2009 ??
Данный код работал нормально в D7: procedure TForm1.Button1Click(Sender:...

Какова разница работы одного кода в Delphi 7 и в Delphi XE5?
Почему приложение состоящие из одинакового кода, но компилируемое в разных...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
21
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru