Vraag : Van TQuery aan TADOQuery.

De beste Deskundigen,

I hebben een bCD-Voorbeeld maar ik wil het in ADO.
The Bcd- voorbeeld veranderen bevat 1 de genoemde tQuery-Componenten van TDatabase -tDatabase-component
and 6:
1. NeedApptsQuery
2. ApptSchedulesQuery
3. GetApptQuery
4. DeleteApptLinkQuery
5. DeleteApptQuery
6. SchedulesQuery
I wil deze 6 tQuery-Componenten in tADOQuery-Components.

Can omzetten iemand me toont waar te om te vullen wat in een tADOQuery-Component van one
TQuery-component. Andere 5 doe ik het zelf.

Thank u in advanced.
Peter Kiers
" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:

object NeedApptsQuery: TQuery
    DatabaseName = „UTF“ <=== dit kan worden genegeerd
    SQL.Strings = (
      „Selecteer * uit GroupLink, GroupAppt“
      „Waar (SchedName =: SchedName)“
      „En (GroupLink.ApptID = GroupAppt.ApptID)“
      „En ((StartDate >=: D1) en (EndDate <=: D2))“)
    Linkerzijde = 392
    Bovenkant = 560
    ParamData = <
      punt
        DataType = ftString
        Naam = „SchedName“
        ParamType = ptUnknown
      eind
      punt
        DataType = ftDate
        Naam = „D1“
        ParamType = ptUnknown
      eind
      punt
        DataType = ftDate
        Naam = „D2“
        ParamType = ptUnknown
      end>
  eind

Antwoord : Van TQuery aan TADOQuery.

1) hoe te om de kolombreedten op het net (2 gebieden) te plaatsen
THISFORM.Grid1.Column1.Width = 20
THISFORM.Grid1.Column2.Width = 30

2) Hoe te om de momenteel geselecteerde rij van het net (enkel gebruiksrecno () te krijgen?)
Ja is RECNO () O.K.

3) U moet _Pagenowaarde in één of andere variabele (b.v. _LastPageno) na het eerste rapport en de druk herinneren
_pageno + _LastPageno
in het tweede rapport

Of schakelaar aan VFP 9 die sleutelwoord NORESET in het bevel van de VORM van het RAPPORT toestaat
Andere oplossingen  
 
programming4us programming4us