View Issue Details
| ID | Project | Category | View Status | Date Submitted | Last Update |
|---|---|---|---|---|---|
| 0001978 | JEDI VCL | 00 JVCL Components | public | 2004-07-15 05:15 | 2004-07-19 13:09 |
| Reporter | Dierk | Assigned To | obones | ||
| Priority | normal | Severity | trivial | Reproducibility | always |
| Status | resolved | Resolution | fixed | ||
| Product Version | |||||
| Target Version | Fixed in Version | ||||
| Summary | 0001978: Problems with last changes of JVClock (designtime access violation in 'JVCTRLSD5R.BPL' ) | ||||
| Description | After compiling latest zip I always get an error window "access violation at address 048...... in modul 'JVCTRLSD5R.BPL' " on showing my form in IDE. On searching for reason, I found out that it has something to do with the last changes of JVClock. Regards Dierk | ||||
| Tags | No tags attached. | ||||
|
|
From Vladimir: LINE 977 procedure DrawSym(Sym: Char; Num: Byte); begin if FullTime or ((NewTime.Second <> FDisplayTime.Second) and IsPartSym(3, Num)) or ((NewTime.Minute <> FDisplayTime.Minute) and IsPartSym(2, Num)) or (NewTime.Hour <> FDisplayTime.Hour) then begin DrawThemedBackground(Self, Canvas, Rect); SetBkMode(Canvas.Handle, Windows.TRANSPARENT); //DrawText(Canvas, Sym, 1, Rect, DT_EXPANDTABS or DrawText(Canvas, @Sym, 1, Rect, DT_EXPANDTABS or DT_VCENTER or DT_CENTER or DT_NOCLIP or DT_SINGLELINE); end; end; LINE 1046 if FullTime or (NewTime.Hour <> FDisplayTime.Hour) then begin Rect.Right := Rect.Left + TextWidth(SAmPm); //DrawText(Canvas, SAmPm[1], Length(SAmPm), Rect, DrawText(Canvas, @SAmPm[1], Length(SAmPm), Rect, DT_EXPANDTABS or DT_VCENTER or DT_NOCLIP or DT_SINGLELINE); end; |
|
|
Have ever tested someone (espacially "asnepvangers") that changes from last sunday (07-11-04) in JVClock???? (Cleaned ifdef's, drawtext(handle .. replaced by drawtext(canvas,.. ) It looks strange too me. Look in Line 1059: =========================== It was: with Canvas do begin .. .. DrawText(Handle, @SAmPm[1], Length(SAmPm), Rect, DT_EXPANDTABS or DT_VCENTER or DT_NOCLIP or DT_SINGLELINE); Now it is???? with Canvas do begin .. .. DrawText(Canvas, SAmPm[1], Length(SAmPm), Rect, DT_EXPANDTABS or DT_VCENTER or DT_NOCLIP or DT_SINGLELINE); =========================== |
|
|
This is now fixed in CVS, Dierk was right. |
| Date Modified | Username | Field | Change |
|---|---|---|---|
| 2004-07-15 05:15 | Dierk | New Issue | |
| 2004-07-19 01:04 | obones | Note Added: 0004775 | |
| 2004-07-19 01:04 | obones | Assigned To | => obones |
| 2004-07-19 01:04 | obones | Status | new => assigned |
| 2004-07-19 01:08 | Dierk | Note Added: 0004776 | |
| 2004-07-19 13:09 | obones | Status | assigned => resolved |
| 2004-07-19 13:09 | obones | Resolution | open => fixed |
| 2004-07-19 13:09 | obones | Note Added: 0004779 |
