| |
| |
REPLACE- #17822 in section [742557] |
| Sec: |
(51) MS-Visual FoxPro 9.0 |
| Von: |
Thomas Geissler |
| An: |
Franz-Dietrich Frhr.v.Recum |
| Am/Um: |
13.02.2020 10:15:53 gelesen |
Hallo Franz-Dietrich,
wenn Dir kleinere Geschwindigkeitseinbußen nicht weh tun, dann kannst Du auch anstelle Deiner FOR-Bedingung einfach eine Funktion aufrufen die dann beliebig komplex sein kann und wie die FOR-Bedingung jeweils .T. oder .F. zurückliefert.
REPLACE AD WITH "AA" FOR Is16thCentury()
FUNCTION Is16thCentury
FOR lnI = 1500 TO 1599
IF "An " + TRANSFORM( lnI ) $ SFELD
RETURN .T.
ENDIF
NEXT
RETURN .F.
ENDFUNC
Gruß
Thomas
PS
Übrigens beginnt das 16. Jahrhundert lt. Wikipedia erst 1501 und endet erst 1600. Wieder was dazugelernt...
|
|
|
|
