Autor Beitrag
marcon01
Hält's aus hier
Beiträge: 11



BeitragVerfasst: Mo 30.07.12 09:05 
Hallo zusammen,

ich habe da mal eine Frage ^^:

Und zwar bin ich dabei einen Kalender zu gestalten mit Hilfe Stringgrids.
Die Tage Samstag und Sonntag bekomme ich auch gemalt/markiert kein Problem aber nun wollte ich auch die festen
Feiertage markiert bekommen und da hapert es.
Es liegt meiner Meinung nach daran, dass das ein anderer Datentyp ist (TDate).
Nun habe ich eine Zeile code die mir den Fehler ausgibt:"Missing operator or semicolon"

Noch gut zu wissen ist, dass ich hier nur den tag und den Monat angegeben habe
da das Jahr variabel bleiben muss.
Das Jahr ändert sich ja immer der Tag und der Monat jedoch bleibt.

Hier der code:
ausblenden Delphi-Quelltext
1:
if( pos( sgPlanerDatum.Cells [ACol,0] := tmpDatum 01.05 ) > 0 ) then ...    //Tag der Arbeit					

über Antworten würde ich mich freuen danke

Moderiert von user profile iconNarses: Delphi-Tags hinzugefügt
bummi
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 1248
Erhaltene Danke: 187

XP - Server 2008R2
D2 - Delphi XE
BeitragVerfasst: Mo 30.07.12 09:46 
irgendetwas in der Art ....
ausblenden Delphi-Quelltext
1:
2:
3:
4:
StrToDate(sgPlanerDatum.Cells [ACol,0] +'.' +IntToStr(Jahr));
//oder

if( pos( sgPlanerDatum.Cells [ACol,0] , FormatDateTime('dd.mm.yyyy',Vergleichdatun) ) > 0 ) then

_________________
Das Problem liegt üblicherweise zwischen den Ohren H₂♂
DRY DRY KISS
marcon01 Threadstarter
Hält's aus hier
Beiträge: 11



BeitragVerfasst: Mo 30.07.12 10:47 
Hallo bummi

Danke für deine Antwort

Ich habe deine Idee eingefügt und ich kann es ohne Fehler compelieren
allerdings malt er mir die Spalte nicht an.

Ich weis nicht woran es liegt aber dennoch danke ^^
Ich denke ich kann hiermit weiter arbeiten ^^
Blawen
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 616
Erhaltene Danke: 33

Win XP, Vista, 7
Delphi 5 Prof., BDS 2006 Prof. RAD Studio XE
BeitragVerfasst: So 05.08.12 09:28 
user profile iconmarcon01 hat folgendes geschrieben Zum zitierten Posting springen:
Ich denke ich kann hiermit weiter arbeiten ^^

user profile iconmarcon01 hat folgendes geschrieben Zum zitierten Posting springen:
ausblenden Delphi-Quelltext
1:
if( pos( sgPlanerDatum.Cells [ACol,0] := tmpDatum 01.05 ) > 0 ) then ...    //Tag der Arbeit					


Und bist Du weitergekommen und hast Du den grundsätzlichen Fehler bei Deiner QT-Zeile entdeckt??

_________________
Es kompilert, wir können ausliefern.
Und es kompiliert wieder - das Update ist fertig - bitte 100 Euro ;-)