[NEWSboard IBMi Forum]
Seite 1 von 2 1 2 Letzte
  1. #1
    Registriert seit
    Jul 2002
    Beiträge
    9

    Question Farbige Texte im SEU

    Hi,

    Ich hab heut eine farbige Textzeile in einem CL-PGM im SEU gesehen.

    Komm leider nicht drauf, wie ich so eine FARBZEILE erstellen kann. Ist Praktisch für übersichtliche Gliederungen!

    Weiß jemand, wie das geht??

    Daniel

  2. #2
    Registriert seit
    Jul 2002
    Beiträge
    218

    Post

    <BLOCKQUOTE><font size="1" face="Verdana, Arial">Zitat:</font><HR>Original erstellt von danielfeurstein:
    Hi,

    Ich hab heut eine farbige Textzeile in einem CL-PGM im SEU gesehen.

    Komm leider nicht drauf, wie ich so eine FARBZEILE erstellen kann. Ist Praktisch für übersichtliche Gliederungen!

    Weiß jemand, wie das geht??

    Daniel
    [/quote]

    Hallo, das kann man mittels einem kleinen programm, das z.B. auf der NEWS/400 Diskette Juli 2000 ´drauf war.
    mfg Hans-Joachim

  3. #3
    Registriert seit
    Jun 2002
    Beiträge
    30

    Talking

    Hallo,

    das Geheimnis dieser Farbzeilen besteht darin, dass die Steuercodes für die farbige Darstellung (wie bei Bildschirmdateien) in die Sourcedatei eingefügt sind.
    Meines Wissens geht so etwas mit dem normalen SEU nicht.
    Im Bereich Load'n'go for free gibt es ein Tool für die Farbdarstellung von RPG-Programmsourcen.

  4. #4
    Registriert seit
    May 2002
    Beiträge
    1.121

    Post

    Ich hoffe das es so geht. die folegnden Zeilen in eine datei kopieren und in das qdls stellen. dann mit CPYFRMPCD in einen qtxtsrc (oder was auch immer) kopieren. Danach solltest du einen member mit 14 farbigen zeilen haben. jetzt brauchst du nur noch deinen source der farbig werden soll editieren, den eben erstellten mit F15 dazuholen, und dann die entsprechende zeile hoch kopieren.
    gruß ronald
    hier die Zeilen zum kopieren
    ÄEtwas Farbe ?
    ÀEtwas Farbe ?
    ´Etwas Farbe ?
    ÍEtwas Farbe ?
    Etwas Farbe ?
    ¹Etwas Farbe ?
    ÎEtwas Farbe ?
    ³Etwas Farbe ?
    ÙEtwas Farbe ?
    ÂEtwas Farbe ?
    ºEtwas Farbe ?
    ¼Etwas Farbe ?
    ËEtwas Farbe ?
    ßEtwas Farbe ?

  5. #5
    Registriert seit
    Mar 2002
    Beiträge
    26

    Post

    Hallo Daniel das mit den Farben ist eigetlich ganz einfach, du schreibst erst mal ein paar Commands in dein SEU.

    Dann machst du ein updf und gibst dann die Parameter ein. Nun siehts viele Hexadezimale zahlen, wenn du dann da die andere Zahlen eingibts WICHTIG untereinader schreiben
    2
    2
    für 22 zum Beispiel, mußt du nur noch die Taste f12 drücken und f1.

    Wenn du dann die Teildatei im SEU aufrufst müssten sich was geändert haben.

    Gruß René

  6. #6
    Registriert seit
    Jul 2002
    Beiträge
    12

    Cool

    <BLOCKQUOTE><font size="1" face="Verdana, Arial">Zitat:</font><HR>Original erstellt von malzusrex:
    Ich hoffe das es so geht. die folegnden Zeilen in eine datei kopieren und in das qdls stellen. dann mit CPYFRMPCD in einen qtxtsrc (oder was auch immer) kopieren. Danach solltest du einen member mit 14 farbigen zeilen haben. jetzt brauchst du nur noch deinen source der farbig werden soll editieren, den eben erstellten mit F15 dazuholen, und dann die entsprechende zeile hoch kopieren.
    gruß ronald
    hier die Zeilen zum kopieren
    ÄEtwas Farbe ?
    ÀEtwas Farbe ?
    ´Etwas Farbe ?
    ÍEtwas Farbe ?
    Etwas Farbe ?
    ¹Etwas Farbe ?
    ÎEtwas Farbe ?
    ³Etwas Farbe ?
    ÙEtwas Farbe ?
    ÂEtwas Farbe ?
    ºEtwas Farbe ?
    ¼Etwas Farbe ?
    ËEtwas Farbe ?
    ßEtwas Farbe ?
    [/quote]

    Hallo Malzusrex

    Klappt wunderbar, einfache + praktische Lösung.

    Viele Grüße

    NorBo



    [Dieser Beitrag wurde von NorBo am 29. Juli 2002 editiert.]

  7. #7
    Registriert seit
    Sep 2001
    Beiträge
    156

    Post

    Hallo
    Also ich arbeite an einem PC mit ClientAccess.
    Für die Eingabe der Farben-Hexcodes habe ich mir jeweils ein Makro geschrieben:
    "apl 22" für X'22' = "highligth" usw.
    Diese Makros habe ich in einem Dialogfenster tastenblock hinterlegt.
    Zum Einfügen im SEU, stelle ich den Cursor auf die gewünschte Stelle, dann Rechtsclick mit der Maus und Hex-Wert auswählen. Nach drücken der Eingabetaste sehe ich die Zeile wunderbar highlighted.
    NB: Meines Wissens kann man auch am dummen Terminal mittels Tastenkombination ALT+HEX+2+2 zum Beispiel den Hexwert 22 eingeben. auch direkt im SEU, oder ?

    Gruss
    Rolf

  8. #8
    Registriert seit
    May 2002
    Beiträge
    1.121

    Post

    hallo rolf
    das probs is nur das die meisten keinen dummen terminal mehr haben, bzw. so wie wir nur als konsole. und dort extra sich immer ran setzen um farben einzutippseln .....

    das mit den makros werd ich aber mal ausprobieren


    gruß ronald

  9. #9
    Registriert seit
    Mar 2001
    Beiträge
    46

    Cool

    Es ist ja ganz schön, mit etwas unterschiedlichen Farben zu differenzieren.
    Aber was haltet Ihr davon, mit Code/400 zu arbeiten. Dann hat sich das Problem sowieso von selber gelöst.

    mfg. Ludger

  10. #10
    Registriert seit
    Apr 2002
    Beiträge
    24

    Post

    <BLOCKQUOTE><font size="1" face="Verdana, Arial">Zitat:</font><HR>Original erstellt von danielfeurstein:
    Hi,

    Ich hab heut eine farbige Textzeile in einem CL-PGM im SEU gesehen.

    Komm leider nicht drauf, wie ich so eine FARBZEILE erstellen kann. Ist Praktisch für übersichtliche Gliederungen!

    Weiß jemand, wie das geht??

    Daniel
    [/quote]

    Wir haben ein kleines Tool, das Sternzeilen in weiß und ausgesternte Zeilen in Blau darstellt. Anhand der vorhandenen Sourcen kann man leicht erkennen, wie man da ein bißchen Farbe ins Spiel bekommt.

    Wenn du willst, kann ich dir die Sachen per Savefile und E-Mail zukommen lassen.

    Gruß Holli


  11. #11
    Registriert seit
    Mar 2002
    Beiträge
    26

    Post

    Hallo Daniel, na wie gehts?

    ICh hoffe du konntest deine RPG-Kenntnisse schon vertiefen. Ich hab eine bitte an Dich. Du must mir noch mal deine E-Mailadresse geben hab die verloren oder schreib einfach an Announcement@gmx.de
    Wäre klasse wenn wir morgen mal schreiben könnten bis dann.

    An alle anderen Leser der Forums, bitte seit mir nicht böse das ich hier mal was privates reingeschrieben habe. Es gab leider keinen anderen weg. Danke für euer Verständnis.

  12. #12
    Registriert seit
    Jul 2002
    Beiträge
    151

    Post

    Hallo Rolf,
    Am dummen Terminal mittels Tastenkombination ALT+HEX kann man nur Werte &gt;= X'40' eingeben. Habe mir mit RPG einen Member zum Kopieren in SEU gebaut wo in Spalte 1 X'22' X'23' usw. steht und in Spalte 70 X'20' um wieder zur normalen Anzeige zurückzukommen.
    Gruß Holger

Similar Threads

  1. SEU Befehlszeile und Reihenfolge Abarbeitung
    By kuempi von stein in forum NEWSboard Programmierung
    Antworten: 2
    Letzter Beitrag: 16-06-06, 09:23
  2. Änderungsdatum SEU und CPYSRCF?
    By Stoeberl in forum NEWSboard Programmierung
    Antworten: 6
    Letzter Beitrag: 31-10-05, 14:39
  3. CL und SEU
    By Seidenstücker in forum NEWSboard Programmierung
    Antworten: 7
    Letzter Beitrag: 20-04-05, 10:14
  4. WDSC - Echte Alternative zu SEU ?
    By klahu in forum NEWSboard Programmierung
    Antworten: 5
    Letzter Beitrag: 08-11-04, 10:55
  5. UserEXIT in SEU -2 Fragen
    By Robi in forum IBM i Hauptforum
    Antworten: 0
    Letzter Beitrag: 25-07-01, 14:02

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • You may not post attachments
  • You may not edit your posts
  •