Notifikationer

Markér alle som læst Log ud

wampiro-uha Nybegynder

04. marts 2004 - 19:46 Der er 11 kommentarer og
1 løsning

Skift side!

Jeg er newbee.

Er der nogen grundlæggende som kan forklare, hvorledes jeg f.eks. kan lave et login-felt med brugernavn og password, og når det er udfyldt skal de tjekkes og hvis brugernavn og password er korrekt skal der ændres til en "side" hvor der står man er logget en.

Jeg vil altså ikke åbne en ny form, men ændre indholdet i min form alt efter om man er logget ind eller ej!

Hvis der er nogen som har en tutorial er det også fint, hvis den er god nok ;-)

Synes godt om

baxos Nybegynder

04. marts 2004 - 20:15 #1

Kan du ikke bare lave en ny form designe den MEN ikke starte formen hvis pass er korrekt

der er et "frame komponent" tror jeg så kan du bare gøre nogle Ala det :
if edit1.text='xxxxxx' then frame1.visible:=true

Synes godt om

stone Forsker

04. marts 2004 - 20:23 #2

jo... du kunne jo designe det hele på en form, og i venstre hjørne kunne du have din login box, hvor du i starten oncreate definere størrelsen på formen, når så din login er = Edit1.text bliver hele formen vist og samtidigt kan du lave din login(edit1) visible:= false + dine 2 knapper. Hvis du forsår hvad jeg mener.

Synes godt om

wampiro-uha Nybegynder

04. marts 2004 - 20:33 #3

Tror det... Kigger på det!

Lige inden jeg lukker, er der så nogen der ved hvordan jeg gør, så hvis man klikker på krydset i højre øverste hjørne, som normalt lukker programmer, hvordan jeg får den til at gøre noget andet?

Altså hedder onClose eller...? For synes ikke helt det virker :-)

Synes godt om

stone Forsker

04. marts 2004 - 20:38 #4

sidder ikke med delphi i øjeblikket så det her er vel lidt junkcode men den virker

var
Form1: TForm1;
const
Password = 'coolenough';

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
if
edit1.Text = password then
form1.Width:= 600 else
Form1.Width := 204;
if
edit1.Text = password then
form1.Height:= 600 else
Form1.Height := 146;
if
Edit1.Text = password then
edit1.Visible := False;
if
Edit1.Text = password then
Button1.Visible := False;
end;

Synes godt om

stone Forsker

04. marts 2004 - 20:57 #5

noget andet når man trykker på x i programmet

husk at uses Shellapi

onclose

ShellExecute(GetdesktopWindow(),nil,pChar('http://www.eksperten.dk')
,nil,nil,SW_SHOWNORMAL); //går til den definerede hjemmeside

Synes godt om

wampiro-uha Nybegynder

04. marts 2004 - 21:37 #6

Jeg skal have den til at gå gemme sig i trayen med CoolTrayIcon, ligesom med MSN Messenger!

Så man for at lukke det skal højreklikke på tray-ikonet og vælge afslut!

Synes godt om

stone Forsker

04. marts 2004 - 22:35 #7

nu kender jeg ikke cooltrayicon men jeg kunne da forstille mig at funktionen "minimere til tray" er der, og når programmet lukkes går den til tray

men prøv at kigge på det her eksempel, det er en tray component, med de ønskede funktioner popupmenu ved højreklik på trayicon for at åbne programmet eller lukke programmet.

http://www.swissdelphicenter.ch/en/showcode.php?id=1303

Synes godt om

wampiro-uha Nybegynder

05. marts 2004 - 14:00 #8

Ok, men jeg tror godt jeg ved hvilken function der lukker det ned til tray'en.

Jeg skal bare lige finde ud af hvilken function som det er der styre lukkeknappen!

Om det er onClose eller?

Synes godt om

baxos Nybegynder

05. marts 2004 - 20:13 #9

Det er OnClose ...

Synes godt om

wampiro-uha Nybegynder

06. marts 2004 - 10:53 #10

Kan I ikke lige lave nogen svar, dem som vil have point. Jeg har lidt svært ved at vælge :-) Håber det er i orden!

Synes godt om

stone Forsker

06. marts 2004 - 11:21 #11

ok...

Synes godt om

wampiro-uha Nybegynder

06. marts 2004 - 11:28 #12

Har lige et aller sidste spm :-)

Når jeg kører dette kald i en popup-menu virker det fint:

procedure TForm1.LukeForaMessenger1Click(Sender: TObject);
begin
Application.Minimize;
TrayIcon.HideMainForm;
end;

Men hvis jeg vil gøre det samme med luk-knappen, således:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Application.Minimize;
TrayIcon.HideMainForm;
end;

Så virker det ikke. Nogen der lige hurtig har forklaringen :-)

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Andet programmering kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Bat file. Af johnnylassen i Andet programmering	4	23/04/202616:10	24/04/202609:43
Hjælp til Api.asmx Af lurup i Andet programmering	1	17/03/202609:27	17/03/202614:12
burgermenu til hjemmeside - hjælp! Af SabrinaL i Andet programmering	2	12/11/202514:10	02/12/202520:42
Hjælp til programmering af website Af hamdenlange i Andet programmering	16	17/08/202522:26	19/08/202515:53
Kan man registrere hvis folk lukker en side ned Af KurtG i Andet programmering	8	24/07/202513:06	28/07/202517:03

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS