hent billed fra sti i db
Hej eksperterJeg er igang med at lave et lille program hvor jeg har et lille problem i mit login.
Når man bliver oprettet som bruger i systemet bliver der gemt en sti til et billed som er valgt. når så du logger ind skal den sammen med det informationer jeg vælger der skal vises og hentes et billed frem. men kan ikke få det til at virker. håber i kan hjælpe mig.
min kode ser sådan her ud.
procedure TForm2.Button1Click(Sender: TObject);
begin
if login.Locate('user',edit1.Text, [])=true then
begin
if login.Locate('pass',edit2.Text, [])=true then
begin
form1.label5.caption:=login.FieldByName('name').AsString;
form1.Label6.Caption:=login.FieldByName('tlf').AsString;
form1.Label8.Caption:=login.FieldByName('adgang').AsString;
form1.Memo1.Text:=login.FieldByName('info').AsString;
form1.StatusBar1.Panels[1].Text:=login.FieldByName('name').AsString;
form1.StatusBar1.Panels[3].Text:='Online';
form1.GroupBox1.Visible:=true;
form1.Image2.Picture:=login.FieldByName('pic').AsString;
close;
end;
end;
end;
Jeg ved ikke hvad jeg har gjort forkert men håber i kan hjælpe mig.
på forhånd tak.
Delphiuser