dichoso separador decimal

[marcoszorrilla]

De acuerdo Andrés, lo puse en la primera entrada, es decir debajo de MapearPuntoAcoma, para comprobar como es lógico que el evento se produce compulsivamente, por lo tanto es lógico desactivar la variable global también al salir de los formularios que la necesitan porque sino la continua evaluación puede restar velocidad a la aplicación.

En este caso como bien dices el cambio propuesto no tendría objeto ya que pusiste en primer lugar esa comprobación con lo cual al no cumplirse no evaluaría el resto.

Un Saludo.

[guillotmarc]

Hola.

Yo lo tenía más fácil ya que en mis aplicaciones, en lugar de tener TDbEdits tengo unos componentes propios heredados del mismo (tienen un par de características propias, como que con el ENTER saltan al siguiente control, etc. ...).

Así que añadí una nueva propiedad a mi TIdEditAvancat, llamada PuntsPerComes. Si la activo, cada vez que el usuario pulsa un punto en el control, es reemplazado por una coma.

procedure TIdEditAvancat.KeyPress(var key: char);
begin
  if FIntroPerTabulador then begin
	if key = #13 then begin
	  key := #0;
	  PostMessage( GetParentForm(Self).Handle, WM_NEXTDLGCTL,0,0 );
	end;
  end;
  if FPuntsPerComes then if Key = '.' then Key := ',';
  if key <> #0 then inherited KeyPress(key);
end;

NOTA: He dejado también el código que cambia el ENTER por un TABULADOR.

Saludos.

[marcoszorrilla]

Use the $B compiler directive to control evaluation mode. The default state is {$B–}, which enables short-circuit evaluation. To enable complete evaluation locally, add the {$B+} directive to your code. You can also switch to complete evaluation on a project-wide basis by selecting Complete Boolean Evaluation in the Compiler Options dialog.

La rectificación por mi propuesta carece de sentido de acuerdo a la explicación dada por Andrés y además aquí esta la ayuda de Delphi que según se observa por defecto hace una evaluación lógica de tipo breve, es decir que en el momento que no coincida la comparación abandona el resto y como Andrés explicó la variable MapearPuntoAComa está en primer lugar.

Un Saludo.

[guillotmarc]

Hola.

Empezado por marcoszorrilla

La rectificación por mi propuesta carece de sentido de acuerdo a la explicación dada por Andrés y además aquí esta la ayuda de Delphi que según se observa por defecto hace una evaluación lógica de tipo breve, es decir que en el momento que no coincida la comparación abandona el resto y como Andrés explicó la variable MapearPuntoAComa está en primer lugar.

Hola, concretamente se llama evaluación perezosa (en inglés es más habitual encontrarla como lazy evaluation). Siempre me ha gustado mucho este nombre.

Saludos.