Schönen Guten Tag allen,
Hab mal wieder ein Problem mit meinem Stringgrid...
Und zwar wie die Überschrift schon besagt versuche ich die Daten(Zeit,Datum) in meinen Datetimepickern(einer für Zeit/der anderere für datum) in meinem Stringgrid anzeigen zu lassen. Die Speicherung klappt ja, wie ich unschwer in meiner Datenbank erkennen kann, mit der Anzeige aber happert es
Kann mir jemand dazu vielleicht nen gedankenschub oder ne Idee geben?
Dazu meine Anzeige:
Delphi-Quellcode:
procedure TAusgang_SL_F.Zeige_Daten; //Anzeige im Grid
var OleVariante : OleVariant;
sqlText : string;
begin
Q_Ausgang.closesql; // Queryabfrage
sqltext:= 'select T.*, '+
'M.Name as Name1, M.Vorname as Vorname1 , ' + //M1-4 Mitarbeiterfelderdekla
'M2.Name as Name2, M2.Vorname as Vorname2,' +
'M3.Name as Name3, M3.Vorname as Vorname3,' +
'M4.Name as Name4, M4.Vorname as Vorname4,' +
'K.Name as Kunde, L.Name as Liefer,'+
'V._Bemerkung,V._Kennzeichen,V._TELEFONFA,V._BEZEICHNUNG, '+//Extraspalten
'I.Name as Interess from XTermin T' + #13#10 +
'left outer join MitarBW M on (M.NR = T._Ma_Nr1) ' +//Zuweisung Mitarbeiter
'left outer join MitarBW M2 on (M2.NR = T._Ma_Nr2) ' +
'left outer join MitarBW M3 on (M3.NR = T._Ma_Nr3) ' +
'left outer join MitarBW M4 on (M4.NR = T._Ma_Nr4) ' +
'left outer join Kunden K on (K.Nummer = T._Adressen_NR) ' +//Kunden usw.
'left outer join Liefer L on (L.Nummer = T._Adressen_NR)'+
'left outer join Interess I on (I.Nummer = T._Adressen_NR)'+
'left outer join XVorgang V on (T._Vorgang_ID = V.Vorgang_ID)' +//Extraspaltenid
'where T._Tag_Von <= ''' + datetimetostr(now) + ''' ' +
'and T._Tag_Bis >= ''' + datetimetostr(now)+ ''' ' +
'and T._Tag_Bis > ''' + datetostr(now + 1) +''' and ((_KZ2= '''') or (_KZ2 is NULL))';
-> Ich persönlich vermute das es an den letzten drei Zeilen hängt, hab auch schon rumprobiert, aber kein Erfolg.
MFG MCFEED