AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Code-Bibliothek Neuen Beitrag zur Code-Library hinzufügen Frage zu Rezeptsammlung-> Suchfunktion durch Array funktioniert nicht
Thema durchsuchen
Ansicht
Themen-Optionen

Frage zu Rezeptsammlung-> Suchfunktion durch Array funktioniert nicht

Ein Thema von Lisaaaa · begonnen am 28. Nov 2017 · letzter Beitrag vom 30. Nov 2017
Antwort Antwort
matashen

Registriert seit: 29. Jan 2007
Ort: daheim
487 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#1

AW: Frage zu Rezeptsammlung-> Suchfunktion durch Array funktioniert nicht

  Alt 28. Nov 2017, 15:28
Hallo,

damit ich auch meinen Senf dazu gebe - ungetestet
denn das mit dem Array ist Käse, geht alles wesentlich eleganter und einfacher, vor allem wenn du etwas erweitern willst
Delphi-Quellcode:
//Stringliste definieren
var meineRezepte: TStringlist;

//.. Instanz erzeugen im OnCreate
meinerezepte:=TStringlist.create;

//.. Etwas hinzufügen
meineRezepte.add('Lieblingsessen');

//.. Suchen
if meineRezepte.indexof('Lieblingsessen')<>-1 then vorhanden

//..Läßt sich statt Edit auch mit Combobox und Autovervollständigung nutzen
//.. Die Strings bekommst du dann rein mit
Combobox1.items.addstrings(meineRezepte);

//.. und wenn du das abspeichern willst
meineRezepte.Savetofile('Zieldatei');

//..zum Beispiel über einen Dialog
if savedialog1.execute then meineRezepte.Savetofile(savedialog1.filename);


// Du kannst genauso durch deine Stringliste mit einer Forschleife und Pos wenn du das willst und musst dich auch um die Anzahl der Gerichte nicht kümmern
gefunden:=false;
for i:=0 to meineRezepte.count-1 do if pos('eingabe',meineRezepte[i])>0 then gefunden:=true;
Matthias
Das Leben ist eines der härtesten.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:31 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz