Updatering af DBLookupCombobox.

Jeg kender ikke anden løsning end at lukke og åbne tabellen/querien igen. Refresh som findes i (vistnok) TDataSet er tit ikke implementeret i de ret mange nedarvinger af denne - og når de er, så gør de sikkert ovenstående.

Hvordan mener du med at lukke og åbne tabelen? Sådan her:

procedure TMalerMainForm1.ToolButton2Click(Sender: TObject);
begin
  DBRichEdit1.Enabled := false;
  DBEDit6.Enabled := false;
  DBEDit7.Enabled := false;
  ADOTable1.Post;

  ADOTable1.Close; <-- det virker ikke.
  ADOTable1.Open;

Nedenstående har jeg også prøvet uden held:
  {  DBLookupComboBox1.Invalidate;
  DBLookupComboBox1.Repaint;
  DBLookupComboBox1.Update;
  DBLookupComboBox1.Refresh;
}
end;

RefreshLookupList i din table1 f.eks hvis du har et field der hedder aargang

så prøv table1.aargang.RefreshLookupList;

hmm det gik vist lidt for stærkt

table1aargang.RefreshLookupList;

fik et "." for meget med

ADOTable1.RefreshLookupList findes ikke.

Jeg begynder at tro om jeg hat sat det rigtigt op. Jeg har følgene:

1 DBLookupComboBox, 7 DBEdit, 1 DBRichEdit og 1 Toolbar. På min toolbar har jeg 10 toolbuttons. 4 toolbuttons er tilknyttet dokumentdatabasen på følgene måde. I designtime er action udfyldt med, DatasetPost, DatasetInsert, DatasetEdit og DatasetDelete, fordi jeg har en actionlist, hvor standard action er valgt. ActionList -> DataSource1 -> ADOTable1. Ide'en er så at når dokumentet er fundet, via DBLookupComboBox, vises OrdreNr i en af DBEdit og Overskrift i en anden DBEdit og indholdet af domkumentet vises i DBRichEdit.

Nogle der kan hjælpe mig lidt på vej? Point kan ændres.

Man skulle så også kunne oprette et nyt dokument og gemme det. Derefter skulle DBLookupComboBox have det nye dokument i sin liste.

jo den findes du skal lige huske dit fieldname hvis det hedder dokument skriver du:

AdoTable1dokument.RefreshLookupList;

Hmm, min ADOTable hedder ADOTable1 og ikke andet. Faktisk så har jeg 2 ADOTable :)

ADOTAble1
ADOTAble2

prøv at db klikke på din adotable her kan du tilføje dine fieldname p

men det er ikke nødvendigt du kan kalde: AdoTable1dokument.RefreshLookupList; fra din actionlist

Tror du at det ville være bedre at du fik koden?

Ja, sku. Det ser ud til at virke. Pisse godt, Stone.

Njaa, måske var jeg lidt for hurtigt.

Når jeg skal lave en ny record og har udfyldt mine 2 DBEdit og gemmer med denne:

procedure TMalerMainForm1.SaveToolButton2Click(Sender: TObject);
begin
  DBRichEdit1.Enabled := false;
  DBEDit6.Enabled := false;
  DBEDit7.Enabled := false;
  ADOTable1.Post;
  ADOTable2Ordrenr.RefreshLookupList;
end;

Jeg raiser en exception class EDatabaseError with message 'Lookup information for field 'Ordrenr' is incomplete.

har du sat dit adotable1ordrenr i properties til:

lookupcache:= True

Nu prøvede jeg noget andet. Som du nævnte skulle jeg prøve det på min ActionList, hvilket jeg så nu har gjort. Her kommer der ingen fejl, men der sker heller ikke noget i min DBLookupComboBox.

procedure TMalerMainForm1.DataSetPost1Execute(Sender: TObject);
begin
  ADOTable1ordrenr.RefreshLookupList;
end;

Det her prøvet nu. Samme resultat.

hmm i din ado prøv at sætte din adotableordrenr i

properties

fieldkind = fkdata // hvis den ikke er det
keyfields = ordernr

så er fejlen væk

Jeps, fejlen opstår ikke mere, men min DBLoopupComboBox bliver ikke opdateret med den sidste record jeg har oprettet.

På min DBLoopupComboBox props er sat følgene:

DataField = OrdreNr
DataSource = DataSource1
Keyfield = OrdreNr
ListSource = DataSource2

Så er spørgsmålet så om det er ADOTable1OrdreNr.RefreshLookupList eller ADOTable2OrdreNr.RefreshLookupList der skal bruges? Bare sådan at jeg ikke fjoller rundt i det og giver dig forkert info.

Hej Stone,

Jeg håber stadig at du har lyst til at hjælpe.

Point er ikke noget problem.

jo da selfølgelig vil jeg hjælpe og ikke pga point "ss" var lige optaget udenbys så jeg kunne ikke lige følge dit spørgsmål op....


ADOTable2OrdreNr.RefreshLookupList

Ja, jeg har heller ikke været helt aktiv idag. Det er min fødselsdag idag.

Ja, det er også den jeg har brugt de gange til sidst.

Tilykke med dagen "SS"

har prøvet at lave et eksempel hvor jeg bruger en ado her bliver lookup opdateret lige med det samme ved post... så jeg er lidt lost med hensyn til problem.

Vil det være nemmere hvis du fik koden?

nej...dine forskellige indstillinger i prop får man jo ikke med. Jeg tror ikke det er en kodefejl - men en justering i properties som er årsagen....

Næ, men jeg tænkte på at sende det hele til dig.

ok....af hensyn til spam skriver jeg lige email adr. på den måde..

steen-larsen (a) pc.dk

On it's way.

Jeg har lavet et eksempel på hvordan jeg har gjort det.

det eksempel giver en helv... masse fejl i min delphi (vcl50.bpl)

hvilken version bruger du?

iøvrigt kan projectet ikke indlæses i min delphi

lige et par spørgsmål:

når du opretter en ny post er det i ado1?
henter du i din dropdown data fra ado2

Fejlen ligger i dit samspil mellem de 2 ado1 og ado2

Jeg bruger Delphi 2005.

Du skrev noget om at du havde lavet et eksempel. Det kunne du prøve at sende.

Og ja, jeg opretter en post med ADO1 og henter min dropdown fra ADO2.

Hmm, jeg tror, at det lykkedes. Når jeg poster nu, bruger jeg ADO2 som også er min dropdown. Det eneste lille minus er, at når jeg sletter en post bliver teksten på den post jeg lige har slettet stadig DBLoopupComboBox felt. Altså ikke i dropdown.

i din adotable2 event "AfterDelete" prøv

DbLookupCombobox1.Refresh;

@Stone

Du må ligge et svar ellers lukker jeg denne sag.

svar