Avatar billede mr_green Nybegynder
10. juli 2003 - 09:26 Der er 4 kommentarer og
1 løsning

Virker DBLookupComboBox ikke sammen med BDE??

Jeg henter data ind i min DBLookupComboBox fra en database, når listen så dropper down og jeg prøver at vælge en anden end den record den står på virker det ikke den closer up men står hele tiden til den samme record, hvad skyldes dette...
Avatar billede mr_green Nybegynder
10. juli 2003 - 09:30 #1
***Min kode ser sådan ud:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, DBTables, DBCtrls, StdCtrls, ADODB, ExtCtrls;

type
  TForm1 = class(TForm)
    DBLookupComboBox1: TDBLookupComboBox;
    Query1: TQuery;
    DataSource1: TDataSource;
    DataSource2: TDataSource;
    Query2: TQuery;
    Edit1: TEdit;
    Database1: TDatabase;
    Button2: TButton;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  Close;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  with Query1 do
  begin
    close;
    ParamByName('EdProjekt').AsString := edit1.Text;
    open;
  end;

  with Query2 do
  begin
    close;
    ParamByName('EdProjekt').AsString := edit1.Text;
    open;
  end;
end;

end.

***Query.SQL:
select childtypenr, name, quantity
from machsparecomb, sparepart
where machinenr =:EdProjekt
and childtypenr = typenr


***DBLookupComboBox
DataSource = DataSource1
DataField = ChildTypeNr

ListSource = DataSource2
KeyField = ChildTypeNr
ListField = ChildTypeNr;Name
Avatar billede devdude Nybegynder
15. juli 2003 - 23:03 #2
Hej der.

Jeg har lige kigget over din kode, og det eneste jeg umiddelbart kan se er galt er at du har sat ListField = ChildTypeNr;Name i din DBLookupComboBox.

Det duer ikke.

ListSource.KeyField er de data, som bliver lagt ned i DataSource.DataField.
ListSource.ListField er de data, der bliver vist i din DBLookupComboBox, og de kan selvfølgelig kun komme fra et felt.

Prøv at sætte ListField = Name og se om det virker.

DevDude
Avatar billede mr_green Nybegynder
16. juli 2003 - 07:15 #3
Det er meningen at listfield skal sættes til 2 og det virker osse fint, bortset fra at jeg ikke kan vælge en ny record i dropdown boxen. Nu når den dropper down kommer der 2 kolloner. hvis jeg kun vælger name kommer der en kollone, men jeg kan stadig ikke vælge nogen...
Det virker forøvrigt fint med ADOQuery som jeg bruger nu, men vil da stadig gerne vide om det kan lade sig gøre med en normal Query??
Avatar billede mr_green Nybegynder
08. september 2003 - 14:03 #4
det kan man nok ikke så...
Avatar billede mr_green Nybegynder
08. september 2003 - 14:04 #5
lukkes
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