Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Palauttaa parametrina annetun kentän arvon halutulle asiakkaalle (parametri Asiakas). Koskee siis vain asiakas -taulua, ei lainkaan asiakas2 -taulua.

Esimerkki:

Code Block
AsiakasTieto(1000, 'Nimi');

EanCodeOk

function EanKoodiOk(Const s: String): Boolean;

Palauttaa TRUE, jos annettu merkkijono on laillinen EAN/UPC -koodi ja FALSE, mikäli ei ole laillinen.

Esimerkki:

Code Block
If EanKoodiOk(Tuotteet['Numero'])=True Caption:='EAN-koodi: '+Tuotteet['Numero'];

ExtractWord

Code Block
function extractWord(SanaNro: integer; Merkkijono,erottimet: String):String

Otaa merkkijonosta yhden sanan. Erottimet parametri voi pitää sisällään usean merkin. Peräkkäiset erottimet tulikitaan yhdeksi. esimerkiksi

Code Block
ExtractWord(2,'100;200;300',';') palauttaa '200' ja ExtractWord(3,'100,23;32,22;14,3',';,') palauttaa 32.

...


s := 'Kuopio;Tampere;Jyväskylä;Helsinki';

...

 
for i:= 1 to WordCount(s,';') do

...

 
showmessage(extractWord(i,s,';'));

FileExists

Code Block
function FileExists(Const s: string): Boolean

Palauttaa TRUE, jos parametrina annettu tiedosto on olemassa ja palauttaa FALSE, mikäli ko. tiedostoa ei löydy.

FilePathStr

Code Block
function FilePathStr:string

Palauttaa kyseisen yrityksen tietokannan polkun. Polku tulee täsmälleen samassa formaatissa kuin se näkyy tiedosto->asetukset ruudulla.

AlvPros

Code Block
function AlvPros(const luokka: integer): Extended;

Palauttaa alvprosentin annetulle luokalle.

Avoinkysely

Code Block
function Avoinkysely(const kysely, tietokanta: string): String;


Kyselyssä viedään kokonainen sql kysely. Tietokanta voi olla tyhjä. Merkkijonoista kannattaa varmistaa ettei siellä ole heittomerkkejä. Mikäli alla olevassa esimerkissä tuotenumero olisi 91'92 tuottaisi kysely virheen.

...