Inicio > Visual Fox Pro > Determinar el número de líneas de un EditBox

Determinar el número de líneas de un EditBox


 Con este truco podrá determinar le número de líneas que ocupa una determinada cadena de texto en un control EditBox.

LOCAL m.nActSetMemo

m.nActSetMemo = Set(“MemoWidth”)

With Thisform.Edit1
Set Memowidth To Floor(.Width/(Fontmetric(6,.FontName,.FontSize)+1))
nLines = Memlines(.Value)
EndWith

? “Número de líneas… ” + Transform(nLines)
Set Memowidth To m.nActSetMemo

Categorías:Visual Fox Pro
  1. Aún no hay comentarios.
  1. No trackbacks yet.

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s

A %d blogueros les gusta esto: