Avatar billede michael-schou Novice
28. februar 2006 - 12:20 Der er 2 kommentarer og
1 løsning

Datasource + Table + Query - Hvordan?

Hejsa.

Min Form Består af felterne : Navn, Kategori, Notat, og Billede.

Jeg designet et program hvori jeg har en søge funktion, som består af : 1 Edit Felt, 2 ChkBoxe, en BitBtn Knap og 2 DBGrids.
Chkbox1 := Navn og ChkBox2 := Kategori.

Hvis jeg har valgt at søge efter navn, skriver jeg mit søgeord i edit1 feltet : f.eks. "Ba" så alt det der starter med "Ba"
bliver vist i DBGrid2.

Hvis jeg så vælger en af posterne i mit DBGRid2 felt, så kan jeg ikke få den til at vise posterne på min form.

For jeg har en DataSource1 som er tilknyttet Table1 og jeg har en DataSource2 Som er tilknyttet min Query1.

Hvordan får jeg vist posten, jeg trykker på i DBGrid'et, i mine felter på min form?


Søgeningen :

<<SNIP>>
If Form3.CheckBox1.Checked = True Then
Begin
  Form3.DBGrid3.Visible := False;
  Temp := AnsiUpperCase(Form3.Edit1.Text);
  Form3.Query1.SQL.Text := 'SELECT * from OpskriftDataB WHERE UPPER(Navn) LIKE "'+Temp+'%"';
  Form3.Query1.Open;
end;

If Form3.CheckBox2.Checked = True Then
Begin
  Form3.DBGrid3.Visible := True;
  Temp := AnsiUpperCase(Form3.Edit1.Text);
  Form3.Query1.SQL.Text := 'SELECT * from OpskriftDataB WHERE UPPER(Kategori) LIKE "'+Temp+'%"';
  Form3.Query1.Open;
end;
<<SNIP>>

/Michael.
Avatar billede kroning Nybegynder
28. februar 2006 - 12:35 #1
Hvis du har et Edit felt på din form der skal indeholde navn så kan du sætte det sådan:

Edit.Text:=Form3.Query1.FieldByName('Navn').AsString;

Du kan så vælge at sætte de forskellige Edits i din DataSource2´s OnDataChange event.
Avatar billede michael-schou Novice
28. februar 2006 - 13:40 #2
Jeg fandt selv en anden løsning :

Når jeg åbner søg :

Form3.EditNavn.DataSource := Form3.DataSource2;
Form3.EditKategori.DataSource := Form3.DataSource2;
Form3.MemoNotater.DataSource := Form3.DataSource2;
Form3.ImageBillede.DataSource := Form3.DataSource2;

Når jeg lukker Søg :

Form3.EditNavn.DataSource := Form3.DataSource1;
Form3.EditKategori.DataSource := Form3.DataSource1;
Form3.MemoNotater.DataSource := Form3.DataSource1;
Form3.ImageBillede.DataSource := Form3.DataSource1;

/Michael.
Avatar billede michael-schou Novice
28. februar 2006 - 13:40 #3
Men tak for din kommentar kroning :)
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