Thomas
Joined: 18 Feb 2005 Posts: 56 Location: Gummersbach, Germany
|
Posted: Wed Mar 02, 2005 12:53 am Post subject: Incomplete display with %st format code |
|
|
When I had a problem, that a character string was not displayed properly with %st format code, I was able to write a short sample program to demonstrate the problem.
The program creates a sequence of 3 ClearWin forms to display slightly different character strings. However, the displayed strings in the first 2 cases are obviously incomplete. It seems that a certain sequence of characters is recognized as a terminating symbol.
The program is quite short. Therefore it can be listed below:
program test
implicit none
!
! Editor: Thomas Will
! Phone : +49/(0)211/4726-179
! e-mail: thomas.will@power.alstom.com
!
! ClearWin+ format code '%st' is not working properly
! in some cases
!
INCLUDE <windows.ins>
CHARACTER*80 string
INTEGER i
!
! incomplete output
string='Verzeichnis: P:TR_ANWENDUNGSTROEMUNGSBERECHNUNGPUMAUSBEISPIELE '
i=winio@('%67st',string(1:67))
!
! still incomplete (2 chars changed)
string='Verzeichnis: P:TR_ANWENDUNGSTROEMUNGSBERECHNUaaPUMAUSBEISPIELE '
i=winio@('%67st',string(1:67))
!
! complete (1 additional char changed)
string='Verzeichnis: P:TR_ANWENDUNGSTROEMUNGSBERECHNaaaPUMAUSBEISPIELE '
i=winio@('%67st',string(1:67))
!
stop
end
Thomas _________________ Thomas |
|