Home

Hojas de estilo para insertar código y hojas de estilo para párrafos con un salto de línea sencillo

Esto es un asunto que siempre tengo que buscar porque nunca lo he memorizado.

Este es el código de la hoja de estilo para los párrafos con un salto de línea sencillo:

<style type="text/css">
P{
        style:word-spacing 0; 
        line-height: 100%; 
        margin-top: 0; 
	margin-bottom: 0;
}
</style>

El código a continuación, es el código de la hoja de estilo para insertar código fuente en las paginas html:

<style type="text/css">
div.code{
	border-left:2px solid green;
	color:green;
	font-size:8pt;
	padding:10px;
	overflow:auto;
	overflow-y:auto;
	width:430px;
	white-space:nowrap;
	padding:5px;
	padding-left:10px;
	padding-bottom:15px;
	background-color:#F4FCF4;
	scrollbar-base-color:#D3DFD3;
	font-family:Courier New,arial,helvetica,verdana;
}
</style>

Aquí va pues el ejemplo de la hoja de estilo anterior. El anterior pedazo de código nos crea el siguiente efecto:

Aquí estaría nuestro código
es un ejemplo bonito, pero en lo personal
prefiero el tag <pre></pre>

El código HTML del anterior ejemplo es el siguiente:

  <div class="code">
        Aquí estaría nuestro código <br />
        es un ejemplo bonito, pero en lo personal <br />
        prefiero el tag <pre></pre>
  </div>

Un ejemplo más elaborado, en otras palabras, un uso real del esa hoja de estilo es el siguiente:

'Note: don't run plain DOS programs with this example
'under Windows 95,98 and ME, as the program freezes when
'execution of program is finnished.
Option Explicit Private Declare Function CreatePipe Lib "kernel32" (phReadPipe As Long, phWritePipe As Long, lpPipeAttributes As SECURITY_ATTRIBUTES, ByVal nSize As Long) As Long
Private Declare Sub GetStartupInfo Lib "kernel32" Alias "GetStartupInfoA" (lpStartupInfo As STARTUPINFO)
Private Declare Function CreateProcess Lib "kernel32" Alias "CreateProcessA" (ByVal lpApplicationName As String, ByVal lpCommandLine As String, lpProcessAttributes As Any, lpThreadAttributes As Any, ByVal bInheritHandles As Long, ByVal dwCreationFlags As Long, lpEnvironment As Any, ByVal lpCurrentDriectory As String, lpStartupInfo As STARTUPINFO, lpProcessInformation As PROCESS_INFORMATION) As Long
Private Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long
Private Declare Function ReadFile Lib "kernel32" (ByVal hFile As Long, lpBuffer As Any, ByVal nNumberOfBytesToRead As Long, lpNumberOfBytesRead As Long, lpOverlapped As Any) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long

Y el código HTML para el ejemplo anterior es el siguiente:

<div class="code">
'Note: don't run plain DOS programs with this example <br />
'under Windows 95,98 and ME, as the program freezes when <br />
'execution of program is finnished. <br />

Option Explicit
Private Declare Function CreatePipe Lib "kernel32" (phReadPipe As Long, 
phWritePipe As Long, lpPipeAttributes As SECURITY_ATTRIBUTES, 
ByVal nSize As Long) As Long <br />
.
.
.
etc, etc, etc.
</div>

Créditos:

La información sobre la hoja de estilos para insertar código fuente, la recolecté examinando el código HTML de este artículo: POP3 con Perl.

El extracto de código que mostré en el segundo ejemplo de la misma hoja de estilos, lo tomé del API-Guide 3.7, en la sección GetStartupInfo(). El API-Guide 3.7 se puede descargar de la siguiente dirección: http://www.allapi.net

Suerte!!!..espero haya servido