Avatar billede xax Nybegynder
26. november 2002 - 19:15 Der er 4 kommentarer og
1 løsning

Login Program

Jeg er nybegynder med delphi, så jeg har brug for noget hjælp. Jeg er ved at lave et clan program, hvor man logger på ved et brugernavn og et password. Jeg har er billede af programmet på:
http://www.geocities.com/stinkydat/index.html

Jeg har også vedlagt souce koden. Hvad skal jeg gøre?

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls, Buttons, Mask, ComCtrls, xmldom, Xmlxform,
  AppEvnts, HTTPApp, Sockets, Psock, NMTime, NMDayTim;

type
  TForm1 = class(TForm)
    GroupBox1: TGroupBox;
    Panel3: TPanel;
    Panel1: TPanel;
    Panel2: TPanel;
    Tstrings: TComboBox;
    Label1: TLabel;
    ProgressBar1: TProgressBar;
    Ejlemos: TEdit;
    Fonix: TEdit;
    Manne: TEdit;
    Stinky: TEdit;
    Label2: TLabel;
    Button1: TButton;
    Label3: TLabel;
    Label4: TLabel;
    ListView1: TListView;
    TreeView1: TTreeView;
    procedure Panel1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Panel1Click(Sender: TObject);
begin

end;

end.
Avatar billede dkn Nybegynder
26. november 2002 - 19:37 #1
ehm hvis jeg var dig ville jeg starte med at kigge på chat demoen som kommer med delphi. den er under delphi\Demos\Internet\Chat

Når du bare har lært lidt om sockets kan du jo komme tilbage, for ellers er det næsten umuligt at give dig bare et hint som du vil forstå. Men det er ret simpelt. Jeg ved ikke om du bare vil have koden, eller rent faktisk lærer noget af det...
Avatar billede xax Nybegynder
26. november 2002 - 19:50 #2
du kan bare give mig koden, og så kan jeg prøve mig frem. Kender du andre steder man kan lærer en masse om delphi??
Avatar billede hermandsen Juniormester
29. november 2002 - 00:52 #3
Avatar billede thecokeguy Nybegynder
07. december 2002 - 04:13 #4
Jeg har lave en kode til en knap, og håber at du kan bruge den.
Hvis du har et spørgsmål om den så mail til: neothefast@hotmail.com
_______________________________________________________________________________

procedure TForm1.Button1Click(Sender: TObject);
begin
  if Combobox1.Text = '..::Manne::..' then
  begin
    if Edit1.Text = 'Password' then
    ShowMessage('Dygtig!');
  end
else
  ShowMessage('Forkert!');
end;
Avatar billede xax Nybegynder
07. december 2002 - 13:55 #5
tak for det. jeg prøver og se hvad der sker, det ender nok med at jeg stiller et par spørgsmål eller 2. Du får pointsne.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester