Delphi-Highlighter für meine Homepage

[Nils_13]

Hi,

wie kann ich einen Delphi-Highlighter für meine Homepage mit PHP programmieren ? Ich hab schon einen aber der ist schlecht.

[noHuman]

Kennst du die GeSHI Syntaxhighlighter for PHP (der 5te Link glaub ich)?
Das sind leistungsfähige Highlighter,
die sogar auf phpBB portiert wurden (Ich wette, Daneil benutzt dass für den Delphi Code hier)

[Daniel Schuhmann]

Zitat:

Zitat von noHuman

Kennst du die GeSHI Syntaxhighlighter for PHP (der 5te Link glaub ich)?

http://qbnz.com/highlighter/

[Nils_13]

Gut, jetzt habe ich diese Datei.

Delphi-Quellcode:

<?php

$language_data = array (
   'LANG_NAME' => 'Delphi',
   'COMMENT_SINGLE' => array(1 => '//'),
   'COMMENT_MULTI' => array('(*' => '*)', '{' => '}'),
   'CASE_KEYWORDS' => 0,
   'QUOTEMARKS' => array("'", '"'),
   'ESCAPE_CHAR' => '',
   'KEYWORDS' => array(
      1 => array(
         'And', 'Array', 'As', 'Begin', 'Case', 'Class', 'Constructor', 'Destructor', 'Div', 'Do', 'DownTo', 'Else',
         'End', 'Except', 'File', 'Finally', 'For', 'Function', 'Goto', 'If', 'Implementation', 'In', 'Inherited', 'Interface',
         'Is', 'Mod', 'Not', 'Object', 'Of', 'On', 'Or', 'Packed', 'Procedure', 'Program', 'Property', 'Raise', 'Record',
         'Repeat', 'Set', 'Shl', 'Shr', 'Then', 'ThreadVar', 'To', 'Try', 'Unit', 'Until', 'Uses', 'While', 'With', 'Xor'
         ),
      2 => array(
         'nil', 'false', 'true', 'var', 'type', 'const'
         ),
      3 => array(
         'Abs', 'Addr', 'AnsiCompareStr', 'AnsiCompareText', 'AnsiContainsStr', 'AnsiEndsStr', 'AnsiIndexStr', 'AnsiLeftStr',
         'AnsiLowerCase', 'AnsiMatchStr', 'AnsiMidStr', 'AnsiPos', 'AnsiReplaceStr', 'AnsiReverseString', 'AnsiRightStr',
         'AnsiStartsStr', 'AnsiUpperCase', 'ArcCos', 'ArcSin', 'ArcTan', 'Assigned', 'BeginThread', 'Bounds', 'CelsiusToFahrenheit',
         'ChangeFileExt', 'Chr', 'CompareStr', 'CompareText', 'Concat', 'Convert', 'Copy', 'Cos', 'CreateDir', 'CurrToStr',
         'CurrToStrF', 'Date', 'DateTimeToFileDate', 'DateTimeToStr', 'DateToStr', 'DayOfTheMonth', 'DayOfTheWeek', 'DayOfTheYear',
         'DayOfWeek', 'DaysBetween', 'DaysInAMonth', 'DaysInAYear', 'DaySpan', 'DegToRad', 'DeleteFile', 'DiskFree', 'DiskSize',
         'DupeString', 'EncodeDate', 'EncodeDateTime', 'EncodeTime', 'EndOfADay', 'EndOfAMonth', 'Eof', 'Eoln', 'Exp', 'ExtractFileDir',
         'ExtractFileDrive', 'ExtractFileExt', 'ExtractFileName', 'ExtractFilePath', 'FahrenheitToCelsius', 'FileAge',
         'FileDateToDateTime', 'FileExists', 'FilePos', 'FileSearch', 'FileSetDate', 'FileSize', 'FindClose', 'FindCmdLineSwitch',
         'FindFirst', 'FindNext', 'FloatToStr', 'FloatToStrF', 'Format', 'FormatCurr', 'FormatDateTime', 'FormatFloat', 'Frac',
         'GetCurrentDir', 'GetLastError', 'GetMem', 'High', 'IncDay', 'IncMinute', 'IncMonth', 'IncYear', 'InputBox',
         'InputQuery', 'Int', 'IntToHex', 'IntToStr', 'IOResult', 'IsInfinite', 'IsLeapYear', 'IsMultiThread', 'IsNaN',
         'LastDelimiter', 'Length', 'Ln', 'Lo', 'Log10', 'Low', 'LowerCase', 'Max', 'Mean', 'MessageDlg', 'MessageDlgPos',
         'MonthOfTheYear', 'Now', 'Odd', 'Ord', 'ParamCount', 'ParamStr', 'Pi', 'Point', 'PointsEqual', 'Pos', 'Pred',
         'Printer', 'PromptForFileName', 'PtInRect', 'RadToDeg', 'Random', 'RandomRange', 'RecodeDate', 'RecodeTime', 'Rect',
         'RemoveDir', 'RenameFile', 'Round', 'SeekEof', 'SeekEoln', 'SelectDirectory', 'SetCurrentDir', 'Sin', 'SizeOf',
         'Slice', 'Sqr', 'Sqrt', 'StringOfChar', 'StringReplace', 'StringToWideChar', 'StrToCurr', 'StrToDate', 'StrToDateTime',
         'StrToFloat', 'StrToInt', 'StrToInt64', 'StrToInt64Def', 'StrToIntDef', 'StrToTime', 'StuffString', 'Succ', 'Sum', 'Tan',
         'Time', 'TimeToStr', 'Tomorrow', 'Trunc', 'UpCase', 'UpperCase', 'VarType', 'WideCharToString', 'WrapText', 'Yesterday',

         'Append', 'AppendStr', 'Assign', 'AssignFile', 'AssignPrn', 'Beep', 'BlockRead', 'BlockWrite', 'Break',
         'ChDir', 'Close', 'CloseFile', 'Continue', 'DateTimeToString', 'Dec', 'DecodeDate', 'DecodeDateTime',
         'DecodeTime', 'Delete', 'Dispose', 'EndThread', 'Erase', 'Exclude', 'Exit', 'FillChar', 'Flush', 'FreeAndNil',
         'FreeMem', 'GetDir', 'GetLocaleFormatSettings', 'Halt', 'Inc', 'Include', 'Insert', 'MkDir', 'Move', 'New',
         'ProcessPath', 'Randomize', 'Read', 'ReadLn', 'ReallocMem', 'Rename', 'ReplaceDate', 'ReplaceTime',
         'Reset', 'ReWrite', 'RmDir', 'RunError', 'Seek', 'SetLength', 'SetString', 'ShowMessage', 'ShowMessageFmt',
         'ShowMessagePos', 'Str', 'Truncate', 'Val', 'Write', 'WriteLn'
         ),
      4 => array(
         'AnsiChar', 'AnsiString', 'Boolean', 'Byte', 'Cardinal', 'Char', 'Comp', 'Currency', 'Double', 'Extended',
         'Int64', 'Integer', 'LongInt', 'LongWord', 'PAnsiChar', 'PAnsiString', 'PChar', 'PCurrency', 'PDateTime',
         'PExtended', 'PInt64', 'Pointer', 'PShortString', 'PString', 'PVariant', 'PWideChar', 'PWideString',
         'Real', 'Real48', 'ShortInt', 'ShortString', 'Single', 'SmallInt', 'String', 'TBits', 'TConvType', 'TDateTime',
         'Text', 'TextFile', 'TFloatFormat', 'TFormatSettings', 'TList', 'TObject', 'TOpenDialog', 'TPoint',
         'TPrintDialog', 'TRect', 'TReplaceFlags', 'TSaveDialog', 'TSearchRec', 'TStringList', 'TSysCharSet',
         'TThreadFunc', 'Variant', 'WideChar', 'WideString', 'Word'
         ),
      ),
   'CASE_SENSITIVE' => array(
      GESHI_COMMENTS => true,
      1 => false,
      2 => false,
      3 => false,
      4 => false,
      ),
   'STYLES' => array(
      'KEYWORDS' => array(
         1 => 'color: #000000; font-weight: bold;',
         2 => 'color: #000000; font-weight: bold;',
         3 => 'color: #000066;',
         4 => 'color: #993333;'
         ),
      'COMMENTS' => array(
         1 => 'color: #808080; font-style: italic;',
         'MULTI' => 'color: #808080; font-style: italic;'
         ),
      'ESCAPE_CHAR' => array(
         ),
      'BRACKETS' => array(
         0 => 'color: #66cc66;'
         ),
      'STRINGS' => array(
         0 => 'color: #ff0000;'
         ),
      'NUMBERS' => array(
         0 => 'color: #cc66cc;'
         ),
      'METHODS' => array(
         1 => 'color: #006600;'
         ),
      'REGEXPS' => array(
            0 => 'color: #9ac;',
            1 => 'color: #ff0000;'
         ),
      'SYMBOLS' => array(
         0 => 'color: #66cc66;'
         ),
      'SCRIPT' => array(
         )
      ),
   'URLS' => array(
      1 => '',
      2 => '',
      3 => '',
      4 => ''
      ),
   'OOLANG' => true,
   'OBJECT_SPLITTERS' => array(
      1 => '.'
      ),
   'REGEXPS' => array(
        0 => '\$[0-9a-fA-F]+',
        1 => '\#\$?[0-9]{1,3}'
      ),
   'STRICT_MODE_APPLIES' => GESHI_NEVER,
   'SCRIPT_DELIMITERS' => array(
      ),
   'HIGHLIGHT_STRICT_BLOCK' => array(
      )
);

?>

Und wie wende ich das an ? Mit dem beiliegenden Beispiel kann ich leider nicht viel anfangen.

[Hador]

Den hier gibt es auch noch:
(ungetestet)
http://www.s2b-project.de/

[Nils_13]

Zitat:

Zitat von Hador

Den hier gibt es auch noch:
(ungetestet)
http://www.s2b-project.de/

@Hador: den hatte ich gerade eben läuft nicht so.
@s2b: nicht sauer sein, den hatte ich schon :mrgreen:

[Daniel Schuhmann]

Zitat:

Zitat von Nils_13

Und wie wende ich das an?

Punkt 2.3 in der Dokumentation sollte weiterhelfen.

[Nils_13]

Zitat:

Zitat von Daniel Schuhmann

Zitat:

Zitat von Nils_13

Und wie wende ich das an?

Punkt 2.3 in der Dokumentation sollte weiterhelfen.

Nicht wirklich.

Code:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 //EN">
<html>
<head>
<title></title>
<meta name="author" content="NILS1">
<meta name="generator" content="Ulli Meybohms HTML EDITOR">
</head>
<body text="#000000" bgcolor="#FFFFFF" link="#FF0000" alink="#FF0000" vlink="#FF0000">
<?php
//
// Include the GeSHi library
//
include_once('geshi.php');

//
// Define some source to highlight, a language to use
// and the path to the language files
//
$code = geshi_highlight($source, 'java', $path, true)
//(* $source = '$foo = 45;
for ( $i = 1; $i < $code; $i++ )
{
  echo "$foo
\n";
  --$foo;
}';
$language = 'php';
//
// Create a GeSHi object
//
$geshi =& new GeSHi($source, $language);

//
// And echo the result!
//
echo $geshi->parse_code();

?>
</body>
</html>

[Daniel Schuhmann]

Wo hakt's denn?

Ich hab es mal eben installiert, funktioniert einwandfrei.

Live-Demo
Quell-Datei

GeSHi selbst liegt im gleichen Ordner inkl. geshi-Unterordner.

// Edit:

Hab mir Deinen Code mal angeschaut, änder mal die Zeilen 19 und 20 ab:

Code:

// alt:
19: $code = geshi_highlight($source, 'java', $path, true) 
20: //(* $source = '$foo = 45; 

// neu
19: $code = geshi_highlight($source, 'java', $path, true);
20: $source = '$foo = 45;

Und hier nochmal die Live-Demo und dieQuelle.

Daniel

[Nils_13]

Also angezeigt wird der Code ja, aber nicht gehighlighted :gruebel:

[Daniel Schuhmann]

In meinen Livedemos funktioniert es aber perfekt, kannst Du ja durch Klicken der Links sehen. *wunder*

Ich hab noch ne kleine Demo hochgeschmissen, die den Code dynamisch erzeugt: Demo und Source

[S2B]

Zitat:

Zitat von Nils_13

@Hador: den hatte ich gerade eben läuft nicht so.

Was heißt hier läuft nicht so? :gruebel: Also bei mir läuft er perfekt (wie man auch am Beispiel auf der Homepage sehen kann). Klar ist er nicht so gut optimiert wie GeSHI oder Beautifier (ist auch noch einer, den verwendet die DP :wink:), aber zumindest läuft er. Und wenn dich die Performance stört, dann mach es wie ich und bau nen kleinen Cache drum rum.

[Nils_13]

Zitat:

Zitat von Daniel Schuhmann

In meinen Livedemos funktioniert es aber perfekt, kannst Du ja durch Klicken der Links sehen. *wunder*

Ich hab noch ne kleine Demo hochgeschmissen, die den Code dynamisch erzeugt: Demo und Source

Zitat:

Internal Server Error
The server encountered an internal error or misconfiguration and was unable to complete your request.

Please contact the server administrator, admin@localhost and inform them of the time the error occurred, and anything you might have done that may have caused the error.

More information about this error may be available in the server error log.

Apache/1.3.23 Server at localhost Port 80

Was muss ich da jetzt noch machen ? Apache läuft.

-

Zitat:

Zitat von S2B

Zitat:

Zitat von Nils_13

@Hador: den hatte ich gerade eben läuft nicht so.

Was heißt hier läuft nicht so? :gruebel: Also bei mir läuft er perfekt (wie man auch am Beispiel auf der Homepage sehen kann). Klar ist er nicht so gut optimiert wie GeSHI oder Beautifier (ist auch noch einer, den verwendet die DP :wink:), aber zumindest läuft er. Und wenn dich die Performance stört, dann mach es wie ich und bau nen kleinen Cache drum rum.

Aber bei meiner Page zeigt der Highlighter folgenden Quellcode so an:

Code:

procedure TForm1.blablabla; begin sfjskgjsdkjhsjkg; end;

aber es soll so aussehen:

Code:

procedure TForm1.blablabla;
begin
sfjskgjsdkjhsjkg;
end;

[Daniel Schuhmann]

Zitat:

Zitat von Nils_13

Internal Server Error

Gute Frage, die Kristallkugel ist leider grad in der Werkstatt.

PHP generell scheint ja zu funktionieren, sonst würde das andere Prog ja nicht laufen.

Ich kann nur von mir ausgehen, ich hab zu Hause Apache 2.0.54 (IPv6-Version) mit PHP 5.0.4, auf dem Berlios-Server isses Apache 1.3.27 mit PHP 4.3.4 - laufen tuts auf beiden 1A.

[S2B]

Zitat:

Zitat von Nils_13

Aber bei meiner Page zeigt der Highlighter folgenden Quellcode so an:

Code:

procedure TForm1.blablabla; begin sfjskgjsdkjhsjkg; end;

aber es soll so aussehen:

Code:

procedure TForm1.blablabla;
begin
sfjskgjsdkjhsjkg;
end;

Dann jag halt den Quellcode danach noch durch ein nl2br(), was ist denn da das Problem? :gruebel:

Edit: Aber eigentlich dürfte das gar nicht vorkommen, denn nl2br() wird schon am Ende der Funktion ausgeführt...

[Nils_13]

Zitat:

Dann jag halt den Quellcode danach noch durch ein nl2br(), was ist denn da das Problem? :gruebel:

Edit: Aber eigentlich dürfte das gar nicht vorkommen, denn nl2br() wird schon am Ende der Funktion ausgeführt...

1. Wird dadurch das gesamte Design zerstört und 2. passiert genauso wenig.

[Nils_13]

Zitat:

Fatal error: Cannot redeclare highlight_delphi_code() in c:\apache\htdocs\nd\tutorials\function.php on line 3

[S2B]

:wall:
Les dir mal die Fehlermeldung durch, bevor du sie hier blind ins Forum postest. :roll:

[faux]

Ich würde mal sagen, dass kann man durch ein include_once bzw require_once lösen.
Wenn nicht stimmt, solltest du mal etwas mehr Posten. :roll:

Grüße
Faux