Search:

Type: Posts; User: coja; Keyword(s):

Page 1 of 5 1 2 3 4

Search: Search took 0.02 seconds.

  1. Replies
    27
    Views
    13,686

    Het opslaan in een DB doe ik als volgend, ...

    Het opslaan in een DB doe ik als volgend,

    tPhotoAlbum is Tablenaam.
    odBlob is een topendialog/topenpicturedialog.

    procedure TfrmMain.btLoadImageClick(Sender: TObject);
    var
    FileStream:...
  2. Replies
    7
    Views
    4,381

    data ophalen met een query.

    Hallo,

    Ik heb een database van acces met daarin de velden palletsperuur en checkdate.
    Palletsperuur is een integer veld en checkdate is een boolean veld.

    palletsperuur checkdate
    5 ...
  3. Replies
    5
    Views
    2,350

    Deze werkt perfect. Mijn dank is groot.

    Deze werkt perfect. Mijn dank is groot.
  4. Replies
    5
    Views
    2,350

    Wat gaat hier fout.

    Wat gaat er fout met deze code.

    procedure TInvoerform.autotellen;
    var
    T1: string;
    T2: string;
    M: integer;
    FS : TFormatSettings;
    begin
    GetLocaleFormatSettings(1043, FS); // 1043 is...
  5. Replies
    7
    Views
    3,994

    Thanks Je hebt gelijk ik was verkeerd begonnen....

    Thanks Je hebt gelijk ik was verkeerd begonnen. Naderhand zijn het calculated field geworden dus daar ging ik de fout in. Maar jou code werkt perfect.
    Bedankt voor het meedenken.
  6. Replies
    7
    Views
    3,994

    Ik stuur een demo even mee dit is niet het...

    Ik stuur een demo even mee dit is niet het werkelijke programma. Het is een exe bestandje met source code. Kopie de text van de edit in de memo en druk op enter.
    De tabel een mdb zit er bij.
    De...
  7. Replies
    7
    Views
    3,994

    Hi, Select sum(Manuren2P) as groen from Data...

    Hi,
    Select sum(Manuren2P) as groen from Data where DagenOpen <= '5' geeft als waarde 124.07 terug.

    Select DagenOpen, sum(Manuren2P) as groen from Data where (DagenOpen) <='5' group by DagenOpen...
  8. Replies
    7
    Views
    3,994

    AdoQuery SQL Berekening.

    Hallo, ik heb een AdoQuery met als SQL opdracht:
    ( Select sum(Manuren2P) as groen from Data where DagenOpen <= '5' group by DagenOpen )
    7140
    De tabel namen zijn op de foto bovenin te zien behalve...
  9. Replies
    12
    Views
    3,908

    Iedereen bedankt voor het meedenken.

    Iedereen bedankt voor het meedenken.
  10. Replies
    12
    Views
    3,908

    Deze geeft een foutmelding format %5.2f invalid...

    Deze geeft een foutmelding format %5.2f invalid or incompatible with argument.
  11. Replies
    12
    Views
    3,908

    Dit is hem alleen 1 haakje teveel ...

    Dit is hem alleen 1 haakje teveel
    totaal.text:=FloatToStrF(StrToFloat(Serie1.text)/StrToFloat(serie2.text)/2,ffFixed,5,2);

    Thanks
  12. Replies
    12
    Views
    3,908

    Helaas krijg ik ook dit niet voor elkaar. Zodra...

    Helaas krijg ik ook dit niet voor elkaar. Zodra ik weer round toespas moet ik strtoint toepassen waaardoor de uitkomst 0 is.

    Bedankt voor het meedenken.
  13. Replies
    12
    Views
    3,908

    Afronden kom er niet uit.

    serie1.text:= 5;
    serie2.text:=15;
    totaal.text:=FloatToStr((StrToFloat(serie1.Text) / StrToFloat(serie2.Text) / 2));

    Uitkomst nu van totaal.text:= 0,166666666666667;

    Deze wil ik afronden naar...
  14. Thread: Minuten berekenen

    by coja
    Replies
    16
    Views
    6,203

    Okee thanks ik zal eens kijken of ik dat met...

    Okee thanks ik zal eens kijken of ik dat met trunc kan oplossen nog niet met trunc gewerkt. Ga het even opzoeken.
  15. Thread: Minuten berekenen

    by coja
    Replies
    16
    Views
    6,203

    Ik kijk niet verder dan naar de minuten. Ik geef...

    Ik kijk niet verder dan naar de minuten. Ik geef bv deze waarde 09.00 tot 11.30
    in een stimepicker van alphatools
    En dan kan het toch voorkomen dat er 1 minuut verschil in kan zitten.
  16. Thread: Minuten berekenen

    by coja
    Replies
    16
    Views
    6,203

    Hallo, Ik heb de code met minutesbetween...

    Hallo,

    Ik heb de code met minutesbetween gebruikt maar kom hier inderdaad achter dat als je twee keer de dezelfde waarde invoerd er soms 1 minuut verschil in zit. Dat zou dus kunnen betekenen dat...
  17. Thread: Minuten berekenen

    by coja
    Replies
    16
    Views
    6,203

    Thanks

    Allemaal bedankt voor jullie reactie. Het werkt nu naar behoren tot de volgende keer.

    Groetjes

    Coja
  18. Thread: Minuten berekenen

    by coja
    Replies
    16
    Views
    6,203

    Minuten berekenen

    Hallo,

    Ik heb een begintijd en een eindtijd op mijn form staan.
    Begintijd is bv 09:00 en de eindtijd is 11:30
    Tussentijd is dan eindtijd - begintijd
    Dat is 2 uur en 30 min.
    Ik wil alleen...
  19. Replies
    8
    Views
    3,690

    Allereerst bedankt voor jullie reactie en ja daar...

    Allereerst bedankt voor jullie reactie en ja daar was ik ook achter gekomen had dus het integerfield een DisplayFormat mee gegeven zodat dit geen probleem geeft in mijn database.
  20. Replies
    8
    Views
    3,690

    Ja je hebt gelijk ik haal de klantnummer op als...

    Ja je hebt gelijk ik haal de klantnummer op als een integer tel er 1 bij op en sla deze op als een string.

    Dit is de code die werkt bij mij.

    var
    klantnum:integer;
    d,s,f : string;
    begin
    ...
  21. Replies
    8
    Views
    3,690

    Thanks voor je reactie maar heb het opgelost....

    Thanks voor je reactie maar heb het opgelost.
    Achteraf toch simpel.
    Oplossing :

    Klantnum: = 1;
    s := FormatDateTime('yyyymmdd', strtodate(d)) + '-' + Format('%.3d', [klantnum]);
    Uitkomst =...
  22. Replies
    8
    Views
    3,690

    Nullen voor een getal.

    Hallo ik heb overal al gezocht maar iedereen wil er de nullen voor een cijfer eraf maar ik wil die erbij bv.

    Mijn klantnr begint dus met 1 maar ik wil dit als 001 zodat er een nieuwe aangemaakt...
  23. Replies
    2
    Views
    1,796

    Listview niet som maar vermenigvuldigen

    Hallo,

    Hier heb ik de code voor het optellen van de subitems in een listview zie onderstaande code
    procedure TForm1.tellingscore;
    var
    Index: integer;
    Som: integer;
    begin
    Som := 0;
    ...
  24. Replies
    25
    Views
    4,209

    Okee heb het zo opgelost function...

    Okee heb het zo opgelost
    function controleer1(kleur1, kleur2 : TColor; controle : boolean; const waarde : smallint) : string;
    begin
    if controle then
    begin
    if (kleur1 = clgreen) or...
  25. Replies
    25
    Views
    4,209

    Ik wil deze gebruiken van je omdat ik zelf aan...

    Ik wil deze gebruiken van je omdat ik zelf aan kan geven welke getal ik kan invoeren.

    Alleen als ik Pak1theorie1.color de kleur clmaroon geef en Pak1praktijk2.color de kleur clgreen en...
Results 1 to 25 of 117
Page 1 of 5 1 2 3 4