Hej eksperter.
jeg er ved at lave et projekt, men det vil ikke som jeg vil.
Jeg kan ikke få min dialog boks til at søge som jeg vil.
Det skulle gerne være sådanne at man indtaster en f.x adresse og fx. tryk eller andet og dermed skal dette resultat gerne vises. De forskellige emner(adr, tryk, postnr.) skal kunne fungere uafhænget af hinanden eller sammen. Som f.x søger jeg på en adr. får jeg disse adr frem. Søger jeg f.x på adr og tryk får jeg disse frem.
Jeg har kun lavet adresse, postnummer og tryk men der kommer flere end nu.
Det skal helst virke sådanne af man ikke skal taste noget i alle menuer.
Er der nogle der har forslag til løsning
Include "mapbasic.def"
Include "icons.def"
Include "menu.def"
declare sub main
declare sub button2()
'****************************************************************************************
sub main()
'****************************************************************************************
create buttonpad "search" as
pushbutton
helpmsg "søgning\\nsøgning"
calling button2
icon MI_ICON_MISC_5
TITLE "søgning"
width 4
toolbarposition(1,1)
fixed
show
end sub
'**************************************************************************************
sub button2()
'***************************************************************************************
'if not istabelopen("brandhane") then
'note "Åben venligst brandhane.tab"
'end if
dim s_adresse as string
dim s_postnummer as string
dim s_tryk as string
dialog
title "Hurtig søgning"
control statictext
title "Adresse: "
position 5,10
control edittext
into s_adresse
control statictext
title "postnummer: "
position 5,30
control edittext
into s_postnummer
control statictext
title "tryk: "
position 5,50
control edittext
into s_tryk
control okbutton
control cancelbutton
if commandinfo (CMD_INFO_DLG_OK) then
select * from brandhane where adresse = s_adresse or postnummer = s_postnummer and tryk =s_tryk into selektion
end if
end sub
Indlæg senest redigeret d. 08.04.2007 11:11 af Bruger #11629