Forum: Datenbanken
by Bummi,
3. Dez 2011
Ich geb mich geschlagen ....
In einer "üblichen" Umgebung schlägt zwar die AnsiUppercase Variante immer noch bei weitem die Containstextvariante, aber was ist heute noch "üblich"
Forum: Datenbanken
by Bummi,
3. Dez 2011
@Stevie
Ja der Befehl schreibt sich kürzer....
ich hatte mich vor längerem trotzdem für meine Version entschieden.
var
tc:Cardinal;
i:Integer;
begin
tc := GetTickCount;
for I := 0 to 10000000 do
Forum: Datenbanken
by Bummi,
3. Dez 2011
Mir wird ganz schlecht bei dem was ich jetzt schreibe...
Found := -1;
While not DS.EOF and (Found=-1) do
begin
For i := 0 to DS.FieldCount - 1 do
begin
if pos(Uppercase(Search),Uppercase(DS.Fields.asString))>0 then
begin
Found := i;