Bom nessa video-aula mostra como desenvolver um sistema básico de login, eu não utilizei banco de dados.



Código do botão :

Código:

begin
if Edit1.Text = 'loginteste' then
begin if Edit2.Text = 'senhateste' then
begin
MessageBoxA(handle, 'Logado com sucesso !', 'LOGIN', 0);
end
else begin
MessageBoxA(handle, 'Login correto/Senha incorreta', 'LOGIN', 0);
end
end
else
begin
MessageBoxA(handle, 'Informações incorretas', 'LOGIN', 0);
end;
end;

Créditos :
xxNikxx