yunusbbayram
09-11-2011, 09:04 AM
secimname = $'Kontrol_yüz kontrol textsR001'.name as
stringstream
secimisim=#()
count=1
while
not eof secimname do
(
secimisim[count]=readchar
secimname
count +=1
)
atoplam
= secimisim.count -
22
askon=#()
askon[atoplam+1]=(secimisim[secimisim.count-2]
as integer)
askon[atoplam+2]=(secimisim[secimisim.count-1] as
integer)
askon[atoplam+3]=(secimisim[secimisim.count] as
integer)
for o in 1 to atoplam
do
(
askon[o]=(secimisim[o] as
string)
)
askontoplam=for i in 1
to atoplam collect askon[i] as
string
askona = ((askontoplam as
string)+"_yüz kontrol textsR" +( askon[atoplam+1]as string +askon[atoplam+2] as
string+askon[atoplam+3] as string))
askona
output : "#("K", "o", "n", "t", "r", "o", "l")_yüz kontrol textsR001"
but I want to like it: "Kontrol_yüz kontrol textsR001"
stringstream
secimisim=#()
count=1
while
not eof secimname do
(
secimisim[count]=readchar
secimname
count +=1
)
atoplam
= secimisim.count -
22
askon=#()
askon[atoplam+1]=(secimisim[secimisim.count-2]
as integer)
askon[atoplam+2]=(secimisim[secimisim.count-1] as
integer)
askon[atoplam+3]=(secimisim[secimisim.count] as
integer)
for o in 1 to atoplam
do
(
askon[o]=(secimisim[o] as
string)
)
askontoplam=for i in 1
to atoplam collect askon[i] as
string
askona = ((askontoplam as
string)+"_yüz kontrol textsR" +( askon[atoplam+1]as string +askon[atoplam+2] as
string+askon[atoplam+3] as string))
askona
output : "#("K", "o", "n", "t", "r", "o", "l")_yüz kontrol textsR001"
but I want to like it: "Kontrol_yüz kontrol textsR001"
