Hallo zusammen,
ich möchte im ReportBuilder ein Label anzeigen lassen, sobald in der Bezeichnung ein bestimmtes Wort vorkommt und habe folgenden Denkansatz:
procedure Label60OnPrint;
begin
if (Positionen['Bezeichnung'] = '+Pommes+') then
Label60.visible := true
else
Label60.visible := false;
end;
das sollte also wie bei SQL die like Funktion sein
kann jemand helfen?
ReportBuilder like Abfrage
ReportBuilder like Abfrage
CAO 1.4.3.906 K
MySQL 4.1.22
Windows Server 2008
MySQL 4.1.22
Windows Server 2008
Re: ReportBuilder like Abfrage
Versuchs mal mit:
Code: Alles auswählen
begin
Label60.Visible := (Positionen['Bezeichnung']) >'Pommes';
end;
es ist ja wie es ist
3x CAO K (Vista, Win 2000)
1x CAO F (Win 7)
Variantenmodul, Anrufmonitor
3x CAO K (Vista, Win 2000)
1x CAO F (Win 7)
Variantenmodul, Anrufmonitor
Re: ReportBuilder like Abfrage
danke für die Antwort, das Label60 wird allerdings bei jedem Artikel angezeigt, also auch bei denen, wo nicht "Pommes" in der Bezeichnung steht, z.B. "Bratwurst mit Senf"Skaribik hat geschrieben:Versuchs mal mit:
Code: Alles auswählen
begin Label60.Visible := (Positionen['Bezeichnung']) >'Pommes'; end;
von SQL kenne ich das mit select * from artikel where kurzname like '%Pommes%'
dann wird alles angezeigt wo das Wort Pommes im Kurznamen steht
CAO 1.4.3.906 K
MySQL 4.1.22
Windows Server 2008
MySQL 4.1.22
Windows Server 2008
Re: ReportBuilder like Abfrage
das dürfte etwas in der Art werden: if AnsiMatchText() könnte ich mir vorstellen.
Gruß Guido
__
DATENSICHERUNG !!!
SELECT * FROM Speisekarte WHERE Typ=”Getränk” ORDER BY Prozent_Alkohol DESC;
__
DATENSICHERUNG !!!
SELECT * FROM Speisekarte WHERE Typ=”Getränk” ORDER BY Prozent_Alkohol DESC;
Re: ReportBuilder like Abfrage
Fehlermeldung: Undefinierter Bezeichner: 'AnsiMatchText'Lafi hat geschrieben:das dürfte etwas in der Art werden: if AnsiMatchText() könnte ich mir vorstellen.
hast du vielleicht noch eine andere Idee?
CAO 1.4.3.906 K
MySQL 4.1.22
Windows Server 2008
MySQL 4.1.22
Windows Server 2008
Re: ReportBuilder like Abfrage
hab die LösungLafi hat geschrieben:das dürfte etwas in der Art werden: if AnsiMatchText() könnte ich mir vorstellen.

begin
Label60.Visible :=(Pos('Pommes', Positionen['Bezeichnung']) > 0)
end;
CAO 1.4.3.906 K
MySQL 4.1.22
Windows Server 2008
MySQL 4.1.22
Windows Server 2008