.


:




:

































 

 

 

 


. (Authentication) - ,




(Authentication) - , . , ( ) , . , . , , (, ).

(). , . .

(Authorization) - . , . , . , .

.

- , . .

, :

1. .

: Delphi:

var
myFile: TextFile;
text: string;

begin
// Test.txt
AssignFile(myFile, 'Test.txt');
ReWrite(myFile);

//
WriteLn(myFile, 'Hello');
WriteLn(myFile, 'World');

//
CloseFile(myFile);

//
FileMode:= fmOpenRead;
Reset(myFile);

//
while not Eof(myFile) do
begin
ReadLn(myFile, text);
ShowMessage(text);
end;

//
CloseFile(myFile);

end;

2. . . () , .

: (Delphi):

// for i:=l to SIZE do

a[i]:= StrToInt(StringGridl.Cells[i - 1, 0]);

//

obr:= StrToInt(edit2.text);

//

found:= FALSE; //

i:= 1;

repeat

if a[i] = obr then

found:= TRUE

else

i:= i + 1;

until (i > SIZE) or (found = TRUE);

3. : ID , , , , () .

4. (: . ).

 

1.

2.

3.

4.

5.

6.

 

.

( )
    ( ) : .
    ( ) : ( , )
    : = +5
    + : .
    + : ( ) .. //
    ( ) : .
    ( ) : ( , )
    + : ( ) .. //
    : 1.  
    ( ) : .
    ( ) : , , , .( Abc)
    ( ) : .
    : : .
    ( ) : ( ).
    ( ) : .
    ( ) : , , , ( »)
    :
    () : . , . .
    ( ) ( : ) , . .  
    ( ) : .
    + : : ---
    ( ) : ( ).
    ( ) : , .
    + : .. //
    () : . , . .
    ( : ) , . .
    ( ) : ( 10 , 10 ).
    ( ) :
    + : .. //
    : .

 

1 1..

1.1 1

1.2 1

2 2 .

2.1 2 ..

2.2 2 ..

.

 

 





:


: 2016-11-24; !; : 826 |


:

:

, ,
==> ...

1702 - | 1687 -


© 2015-2024 lektsii.org - -

: 0.012 .