marabua, jetzt brauch ich doch nochmals deine Hilfe.
Habe deine Form an einer anderen Stelle noch verwendet:
Delphi-Quellcode:
procedure TMainForm.Prepairings1Click(Sender: TObject);
const
sel
= 'select Order as "Order",Client,Article as "Style",pieces,prepair,prepconfirm as "HK conf.", '
+ 'prepout as "Prep.fin.",plancutting,plansewing,planfinishing, '
+ 'observations as "Remarks" '
+ 'from orders where prepair <> '+QuotedStr('no')+' and sewingout is null '
;
begin
ShowDBView(sel, 'Prepairings - inside + outside', True, True);
with DBView.DBNavigator1 do
VisibleButtons := VisibleButtons - [nbinsert, nbdelete];
end;
{showdbview('select Order as "Order",Client,Article as "Style",Pieces,prepair,prepconfirm as "HK conf.",prepout as "prep.fin.",'
+'plancutting,cuttingout,plansewing,observations as "Remarks"'
+'from orders where prepair <> '+QuotedStr('no')+' and sewingout is null','Prepairings - inside + outside',true,true);}
kommt jetzt aber die Fehlermeldung "Konstantenausdruck erwartet".
Es ist sicher wegen dem ... '+QuotedStr('no')...??
wie muss ich korrigieren, habe schon etliches probiert...
in meinem alten Code (siehe darunter mit {} ) funktioniert es...