Kommentar: Einfügen von HTML im Kommentar: Link einfügen: <a href="LINKURL" target="_blank">LINKTITEL</a> Bild einfügen: <img src="BILDURL"> Text formatieren: <b>fetter Text</b> <i>kursiver Text</i> <u>unterstrichener Text</u> Kombinationen sind auch möglich z.B.: <b><i>fetter & kursiver Text</i></b> C Quellcode formatieren: <code>Quellcode</code> BASIC Quellcode formatieren: <basic>Quellcode</basic> (Innerhalb eines Quellcodeabschnitts ist kein html möglich.) Wichtig: Bitte mache Zeilenumbrüche, bevor Du am rechten Rand des Eingabefeldes ankommst ! -> I > Ich woll gerne ein Teil von eine String (KarakterLinien) ausnemen (Engl. TextPartition). > Es gelingt die einzelne Zeichen am Schirm zu tonen, aber nicht die Zeichen an einander zu reihen. > Wer hat eine Lösung? > > > <i> > Dim langetekst(20), langetekst2(200), strOutput(20) As Char > Dim strLine1(20), strLine2(20) As Char > > Sub main() > strLine2="RiaKeesViktor" > TextPartition(strLine2, 3,4) > Msg_WriteText(strOutput) > End Sub > > > Sub TextPartition(ByRef strLine As Char, intStart As Integer, intLength As Integer) As Char > Dim i As Integer > Dim teken(2) As Char > 'Based on manual C-Control Pro Mega Series, p. 105 > strOutput="" 'Clear strOutput > > i=intStart > Do While strLine(i) > If i=intStart+ intLength Then: Exit: End If > 'Str_Copy(strOutput, Char(strLine(i)),STR_APPEND) 'Error: unpexpected Char > Msg_WriteInt(i): Msg_WriteChar(9) 'only for testpurposes > Msg_WriteChar(strLine(i)): Msg_WriteChar(13) 'only for testpurposes > i=i+1 > End While > > Msg_WriteText(strOutput) 'only for testpurposes > Return i > End Sub > </i>
