Avatar billede andreas Nybegynder
03. maj 1999 - 00:00 Der er 10 kommentarer og
1 løsning

Et par vigtige ting...!!!!

Jeg har sgu lige nogle problemer i Delphien.

1:
Hvordan kan jeg lave såén at når man i et password dialo har forsøgt at komme ind 3 gang vil der komme til en ny side
altså jeg bruger det her script

Produce button1.click bla bla bla
begin
if edit1.text= 'password' then
begin
form2.show;
end
else
begin
her skal den kode så være at når man har prøvet at skrive noget forkert 3 gange vil de stille videre til en ny side
end;
end;

2:
Hvordan laver jeg sådan at når man åbner et program, vil det først gå ned og se om der ligger en fil på HD-en og hvis den fil så ikke ligger der skal den åbne en anden side, og hvis den ligger der skal den åbner den side man vil ind på.

3:
Så er der bare lige det at hvordan laver jeg sådan at man laver en Doc fil og der i kan jeg skrive et par linjer, og så har jeg set at man kan sætte password på Doc filen. Hvordan ????

Håber i kan hjælpe mig.

/Andreas, Super Sheep
Avatar billede erikjacobsen Ekspert
03. maj 1999 - 23:29 #1
1: Lav en global variabel, g, (evt. i formen), som sættes til 0 i formens onActivate event. Hver gang der svares forkert password:

inc(g);
if g>=3 then
  whatever.showmodal;

2: I startsidens onActivate skriver du
      if fileexists('C:\lIUHLWEH\ASKJFLKSJF\SDFSDF.TXT') then
        etellerandet.showmodal
      else
        nogetheltandet.showmodal

3: Jeg forstår ikke spørgsmålet. Er en .doc fil et Word dokument?

To ud af tre.... det må være et svar...
Avatar billede andreas Nybegynder
04. maj 1999 - 20:19 #2
En doc fil er et Word dokument. Og så har jeg læst i Hjælp, at man kan sætte en kode på filen. Øhhh hvad er det lige det er du svare på, hvadfor et spørgsmål...???

/Andreas
Avatar billede andreas Nybegynder
04. maj 1999 - 20:33 #3
Der er ikke lige noget jeg fatter, jeg vil have sådan at når den åbner en form, skal den tjekke om der findes en fil og hvis der ikkke gøre det skal den lukke formen, MEN man kan skrive et password og i et felt og så opretter den filen, og næstegang man åbner den form vil den IKKE spørge efter et password.

/Andreas, Super Sheep
Avatar billede erikjacobsen Ekspert
05. maj 1999 - 13:38 #4
Det lyder kryptisk og besværligt at gøre det på den måde. Hvorfor ikke
checke inden du åbner formen, om filen er der, og hvis ikke, så åbne
en anden form til indtastning af password? Altså ganske som jeg svarede
på i 2, blot aktiveret af et tryk på en knap.
Avatar billede andreas Nybegynder
05. maj 1999 - 21:12 #5
okidoki erik.

Men jeg kan sgu ikke få det til at virke. kan du ikke skrive den formel der skal til, jeg fatter det sgu ikke,
jeg skriver:

produce button1.click bla bla bla

\\

if edit1.text='' then begin
form2.show;
end
else begin
inc(g);
if g>=3 then
  whatever.showmodal;
end;
end;

fatter der sgu ikke, vil du ikke sende HELE side formlen, altså alt hvid der står i koden!

/Andreas, Super Sheep
Avatar billede andreas Nybegynder
05. maj 1999 - 21:20 #6
faktisk skal den gå ned i filen og checke om der findes et par linier i filen. MEN hvordan faén laver jeg det der skal oprette en fil ???

det med tælleren virker sgu ikke

/Andreas, Super Sheep
Avatar billede erikjacobsen Ekspert
07. maj 1999 - 15:14 #7
Din email?  (Bare rolig, det er blot for at kunne sende andreas et
helt Delphi-program - når vi finder ud af hvad problemet og løsningen er
kommer det jo her i dette fortrinlige forum!)
Avatar billede andreas Nybegynder
07. maj 1999 - 22:46 #8
Erik:

Min e-mail er Andreas@pengemand.dk

/Andreas
Avatar billede dj Nybegynder
19. maj 1999 - 15:14 #9
lav den sådan her:

Produce button1.click bla bla bla
var
antal: integer;
begin
if edit1.text= 'password' then
begin
form2.show;
end
else
begin
inc(antal);
if antal=3 then begin
forkertpassform.show;
end;
end;
end;
Avatar billede respen Nybegynder
21. maj 1999 - 11:42 #10
Som Erik skriver skal du have en global variabel, som skal initialiseres ved opstart.

I den event du har skrevet, er:

1. variablen ikke initialiseret, så når du incrementer så går det galt.

2. Antal er ikke en global variabel

rene
Avatar billede dj Nybegynder
31. maj 1999 - 13:23 #11
spørgsmål 2:
if fileexists('C:\whatever.exe')=true then
//action 1 ex:
form2.show
else
//action 2 ex:
form3.show

spørgsmål 3:
ehhm.. du vil sætte et password på et worddokument fra delphi ?
well, det kan jeg vist ikke hjælpe med :/
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