This is a sample of using Google Prettify to do syntax highligiting of code. I put a few different code snippets below in various languages to give you a comparison of how the code is highlighted.
SQL Script
DECLARE cOrder CURSOR AS EXECUTE PROCEDURE CreateInvoice( 141, 10010 ); DECLARE @OrdID CHAR(36); DECLARE @Price MONEY; BEGIN TRANSACTION; OPEN cOrder; FETCH cOrder; @OrdID = cOrder.OrderID; -- Insert some line items EXECUTE PROCEDURE AddInvoiceItem( @OrdID, 'SP080-60', 25 ); EXECUTE PROCEDURE AddInvoiceItem( @OrdID, 'SP060-13', 15 ); EXECUTE PROCEDURE AddInvoiceItem( @OrdID, 'SP025-10', 20 ); EXECUTE PROCEDURE AddInvoiceItem( @OrdID, 'SP100-13', 30 ); // Process the order EXECUTE PROCEDURE ProcessOrder( @OrdID ); // Commit the transaction COMMIT WORK;C-Sharp
private void TestConnection(string ConnectionString) { using (AdsConnection conn = new AdsConnection( ConnectionString )) { try { conn.Open(); MessageBox.Show("Connection Successful", "Connection Result" ); } catch (Exception aex) { MessageBox.Show(aex.Message, "Connection Result" ); } }Delphi
procedure TForm1.Button1Click(Sender: TObject); var iCount, kCount : integer; bFound : boolean; dStart, dStop : Double; begin AdsTable1.Filtered := False; AdsTable1.Filter := 'DEPTNUM = 14'; for iCount := 0 to 30 do begin kCount := 0; AdsTable1.First; bFound := AdsTable1.FindFirst; while ( bFound ) and Not( AdsTable1.EOF ) do begin bFound := AdsTable1.FindNext; kCount := kCount + 1; end; end; end;C++
UNSIGNED32 DoTrans( void ) { ADSHANDLE hTable; UNSIGNED32 ulRetVal; UNSIGNED16 bInTrans; /* open the table */ ulRetVal = AdsOpenTable( 0, "X:\\DATA\\DEMO10.DBF", "TEST", ADS_CDX, ADS_ANSI, ADS_COMPATIBLE_LOCKING, ADS_CHECKRIGHTS, ADS_EXCLUSIVE, &hTable ); if ( ulRetVal != AE_SUCCESS ) { /* some kind of error, tell the user what happened */ AdsShowError( "ACE Couldn't open table" ); return ulRetVal; } /* begin a transaction */ AdsBeginTransaction( 0 ); /* make sure we're in an active transaction */ AdsInTransaction( 0, &bInTrans ); if ( !bInTrans ) MessageBox( 0, "Should be in transaction!", "ACE ERROR", MB_OK | MB_ICONSTOP ); /* we're just demonstrating AdsInTransaction, so we'll * roll back the transaction */ AdsRollbackTransaction( 0 ); AdsCloseTable( hTable ); return AE_SUCCESS; } /* DoTrans */