Ventana de seguimiento de los números en mdi editores

10/20/2018

1295

Ventana de seguimiento de los números en mdi editores

la Ventana de manejo es importante en cualquier complejo MDI 'editor'. Usted necesita un
estable y actualizado de la ventana de la lista de números. El valor predeterminado de recogida de la lista
el menú de la Ventana es inestable si usted tiene más de diez archivos abiertos. Es
tiene sentido para construir su propio sistema de seguimiento.

Ventana de Seguimiento de los Números en MDI Editores

Por Gene Fowler
[email protected]

Advertencia: La prueba de la cama para que este código es de Borland TextEdit demo que viene con Delphi. Si se compila en Delphi 5 o 5.01, será necesario la modificación de los formularios.pas que dirijo a usted en mi anterior artículo, Sistema de Programación/Next (Anterior) en MDI editores.

En la descripción anterior, puedo decir que el menú de la Ventana de lista de selección es inestable cuando más de diez ventanas están abiertas. Me estoy refiriendo al hecho de que cualquier archivo más allá de la novena, cuando se selecciona, se convierte en el noveno. Un usuario no va regularmente tienen diez o más ventanas abiertas y no es probable que prestar mucha atención a los números de la lista, de todos modos. Pero Microsoft la noción de que los usuarios la capacidad mental, no es gratuita. Los números en la lista parece ser sólo un artefacto de una lista numerada. Y sólo nueve son contados, el noveno 'cambio' como el cuadro de diálogo que sale y otros son escogidos. Cuando una ventana está arriba no hay nada para identificar su posición en cualquier orden, y no digamos la carga de la orden. Sistema/Siguiente (y Anterior) voltea a través de la z-stack (orden) que cambia de momento a momento.

En eWriter, mi MDI textwriter (el software descendiente de la antigua hardware de la máquina de escribir), puse una ventana (número asignado en la carga y actualiza cuando un archivo con un número inferior está cerrado) en la barra de estado, junto con el archivo de bytes de tamaño. Hacer clic en la barra de estado obtendrá el 'siguiente' en el archivo de carga-orden (el lado superior de la ventana de número). Para saltar, yo uso el viejo Turbo Alt TopNum# para la ventana de #1..#9. Alt TopNum#0 se presenta un cuadro de diálogo que tengo en el menú de la Ventana (por encima del valor predeterminado de la lista de selección). Este cuadro de diálogo ofrece rutas de acceso completa y una lista de selección. Si el usuario no está seguro de que Alt # él o ella quiere, Alt 0 y haga clic en el nombre de la ruta y otro en el botón Go no retrasar el salto mucho.

El siguiente código implementa (en TextEdit) un sencillo sistema de seguimiento que realiza un seguimiento de la ventana de los números y los archivos adjuntos. Yo lo he puesto en un simple visor de modo que usted puede 'comprobar' la ventana de números después de su se abre, se cierra, y arrastrando los pies. No sé por qué 'z-stack' orden sería útil, pero se puede ver que la forma más sencilla de comprobar el archivo/número de conexión también refleja el orden-z en el visor.

Nota: En la configuración de la Baldosa Top 2 de N de Windows en mi Selectivo Mosaico en MDI Editores, no puse en el manejo de 'sin título' los archivos, ya sea antes o después de Guardar lo que pone en una ruta de acceso. En SavingAs1Click, yo no agregar el nuevo archivo a OpenFiles. Y yo en ninguna parte nada acerca de un 'sin Título' que no tiene ninguna ruta. Si el 'sin Título' es uno de los dos, que no causa ningún problema. En el siguiente código, que incluyen un SaveAs1Click que pueden ser incluidas en el suelo de Baldosas artículo del código. Si desea guardar el nuevo archivo se coloca en la OpenFiles y está incluido en todos los procesos. Si usted tiene un inconverso 'sin Título' en el Archivo, sin embargo, tendrá efectos extraños (como lo hacen ahora, si el archivo se guarda o no). El Baldosa Top 2 de N de windows se ignoran. Se mostrará en el suelo de baldosas. La pérdida de Restaurar el tamaño no es uno de los efectos extraños. Que es causada por la Tile1Click que me llame en Baldosa Top 2 de N de windows.

Código:

En el uso de TextEdit como un banco de pruebas para el MDI Editor de Texto el desarrollo
estoy haciendo en estos artículos, algunos propiedades necesita ser ajustado.
Estos son:

TOpenDialog Opciones/ofAllowMultiSelect: True

TEditForm WindowState: wsmaximized

En MDIFrame.pas, declarar un mundial (sección de Interfaz) variable denominada
EditTag que se utiliza en las versiones modificadas de New1Click y
Open1Click. OpenFiles, usado más tarde, también se declara y se
inicializa.

TFrameForm
...
var
...
EditTag: longInt
OpenFiles: TstringList

Inicialización
...
OpenFiles := TStringList.Crear
OpenFiles.Text := '

El Open1Click y New1Click rutinas de proporcionar un valor para EditTag
antes de cada apertura. El valor será puesto en EditForm la etiqueta
variable (En su FormCreate de rutina). Esto asegurará que cada
editor tendrá una ventana de número.

procedimiento TFrameForm.New1Click(Sender: TObject)
begin
LockWindowUpdate(Asa)
EditTag := MDIChildCount 1
TEditForm.Create(Self)
LockWindowUpdate(0)
fin

procedimiento TFrameForm.Open1Click(Sender: TObject)
var
i: integer

begin
si OpenFileDialog.Ejecutar, a continuación,
LockWindowUpdate(Asa)
For i := 0 a OpenFileDialog.Los archivos.count - 1 do
begin
EditTag := MDIChildCount 1
con TEditForm.Create(Self) no
Abrir(OpenFileDialog.Archivos[i])
fin
LockWindowUpdate(0)
fin

En TeditForm (MDIEdit.pas), todo el seguimiento es tomado cuidado de. En
FormCreate, copia EditTag en la Etiqueta:

procedimiento TEditForm.FormCreate(Sender: TObject)
begin
Ruta de acceso := DefaultFileName
la Etiqueta := EditTag
fin

EditTag es la secuencia de carga) de la Ventana de Número. Este se mantendrá en
EditForm la Etiqueta de variable. Estos números almacenados se 'mudó'
cuando un editor con un número inferior está cerrado. Ahora, podemos construir en nuestra
verdadero motor de seguimiento utilizando TEditForm.Cerrar. Esta rutina utiliza el
OpenFiles fconnectionlog yo he declarado en MDIFrame.pas.

procedimiento TEditForm.FormClose(Sender: TObject var Acción: TCloseAction)
var
i, j: LongInt
CloseTag: integer

begin
CloseTag := Etiqueta
para j := 0 a (FrameForm.MDIChildCount - 1)
con FrameForm.MDIChildren[j] como TEditForm hacer
begin
si la Etiqueta > > CloseTag, a continuación,
la Etiqueta := Tag - 1
fin
for i := 0 a OpenFiles.Count - 1 do
si OpenFiles[i] = Ruta de acceso, a continuación,
begin
OpenFiles.Eliminar(i)
break
fin
Acción := caFree
fin

procedimiento TEditForm.Saveas1Click(Sender: TObject)
begin
SaveFileDialog.FileName := Ruta de acceso
si SaveFileDialog.Ejecutar, a continuación,
begin
Ruta de acceso := SaveFileDialog.Nombre de archivo
Caption := ExtractFileName(PathName)
OpenFiles.Insertar(Etiqueta, Pathname) // lista nueva Ruta de acceso
Save1Click(Remitente)
fin
fin

Ver Resultados:

Nota: El visor de elemento de menú se establece a continuación parece ser la causa del defecto de la lista de selección de abandonar, al menos en Delphi 5. He jugueteó con los Selectores de dentro y fuera. Usted podría querer jugar con él y ver si usted puede conseguir el editor de texto de la lista de selección para la transposición de la z-pila antes de ver seguimiento de windows. Usted podría tener que Restaurar windows a tamaño pequeño para mezclar el orden z tirando de windows. Esta es, probablemente, sólo en D5 (no D2-D4) que se encarga del menú de creación en una forma que yo aun no muy cogido el tranquillo. Sin duda, estoy de reconstruir el menú de la Ventana por encima de la predeterminada de la lista de selección en eWriter escrito por primera vez en Delpi 3 y migran a través de Delphi 4 a 5.

queremos un 'visor' para ver los resultados de nuestra asignación y seguimiento
de la Ventana de Números como abrir, cerrar, y shuffle (z-stack) de windows.
En la parte inferior de la Ventana de opciones del menú de la lista, agregar un nuevo elemento de menú:

Título: Ventana de Asignación de Número de Lista

Nombre: WinNumList1

de la Ficha Eventos y haga doble clic en OnClick. A continuación, rellene
el controlador de eventos para crear esta rutina:

procedimiento TFrameForm.WinNumList1Click(Sender: TObject)
var
i, j: integer
Lista: tstringList
S: string

begin
// Esta rutina es un poco complicada para la captura de 'los Nuevos Archivos'
Lista := TSTringList.Crear
de la Lista.Add ('Ultraperiféricas de la Ventana en la parte superior,' Z-stack 'orden' #13)
For i := 0 a (MDIChildCount - 1)
Begin
S := 'la Ventana Número' IntToStr(MDIChildren[i].Tag)
si MDIChildren[i].Caption = DefaultFileName, a continuación,
begin
S := S '' MDIChildren[i].Título
de la Lista.Agregar(S)
fin
else
begin
para j := 0 a (OpenFiles.Count - 1)
si pos(MDIChildren[i].Título OpenFiles.cadenas[j]) <> 0 then
begin
S := S '' OpenFiles.Cadenas[j]
de la Lista.Agregar(S)
break
fin
fin
fin
messageDlg(Lista.Texto, mtInformation, [mbOK],0)
de la Lista.Libre
fin

Aquí está una mirada en el resultado:

Nota: Para ver los usos de esta ventana número de seguimiento en el complejo tapiz de mundo real de la ventana de manejo, podría jugar con mi eWriter textwriter. No solo es freeware, pero no se instala a sí mismo en la tela de un sistema. Es fácil jugar con. Cada abrir el editor tiene su Ventana de Número en la barra de estado. Hacer clic en la barra de estado se presenta la siguiente ventana número de editor. Alt TopNum# (1..9) se presenta la ventana que se numeran de 1..9. Alt TopNum0 obtiene una ruta de acceso completa lista pic, aunque el título por defecto sólo de lista de selección en el menú Ventana para poco más rápido de picking. (La ruta de acceso completa de la lista de selección está por encima de ella en el menú.) 0.C, que se estrenará en junio de 2001, se han ventana de números en el nombre de ruta de acceso de la lista de selección como consecuencia de mi forma de escribir este artículo.

Entrelazado Bibliografía

empecé ad-libbing estos artículos en hacer algunas de las cosas que puedo hacer
en eWriter en el Delphi demo TextEdit (de la que he construido eWriter).
Es natural a acumular todas estas en una copia de la edición de textos. Y
puede que tenga que ir de ida y vuelta a llenar de nuevo, perdidas, o
cambió rutinas de compatibilidad. Caja notas que aparecen la mayoría de los lugares. Figura
es en la 'tienda' conversación...

Sistema de Programación/Next (Anterior) en MDI editores

http://www.HowToDoThings.com/showarticle.asp?article=143

Selectivo Mosaico en MDI Editores

http://www.HowToDoThings.com/showarticle.asp?article=147

Ventana de Seguimiento de los Números en MDI Editores

http://www.HowToDoThings.com/showarticle.asp?article=154

Párrafo 'verter' desde un editor de texto

http://www.HowToDoThings.com/showarticle.asp?article=178

Ventana de seguimiento de los numeros en mdi editores

Ventana de seguimiento de los numeros en mdi editores : Multi-millones de consejos para hacer su vida mas facil.

la Ventana de manejo es importante en cualquier complejo MDI 'editor'. Usted necesita un
estable y actualizado de la ventana de la lista de numeros. El valor predeterminado de recogida de la lista
el menu de la Ventana es inestable si usted tiene mas de diez archivos abiertos. Es
tiene sentido para construir su propio sistema de seguimiento.

Ventana de Seguimiento de los Numeros en MDI Editores

Por Gene Fowler
[email protected]

Advertencia: La prueba de la cama para que este codigo es de Borland TextEdit demo que viene con Delphi. Si se compila en Delphi 5 o 5.01, sera necesario la modificacion de los formularios.pas que dirijo a usted en mi anterior articulo, Sistema de Programacion/Next (Anterior) en MDI editores.

En la descripcion anterior, puedo decir que el menu de la Ventana de lista de seleccion es inestable cuando mas de diez ventanas estan abiertas. Me estoy refiriendo al hecho de que cualquier archivo mas alla de la novena, cuando se selecciona, se convierte en el noveno. Un usuario no va regularmente tienen diez o mas ventanas abiertas y no es probable que prestar mucha atencion a los numeros de la lista, de todos modos. Pero Microsoft la nocion de que los usuarios la capacidad mental, no es gratuita. Los numeros en la lista parece ser solo un artefacto de una lista numerada. Y solo nueve son contados, el noveno 'cambio' como el cuadro de dialogo que sale y otros son escogidos. Cuando una ventana esta arriba no hay nada para identificar su posicion en cualquier orden, y no digamos la carga de la orden. Sistema/Siguiente (y Anterior) voltea a traves de la z-stack (orden) que cambia de momento a momento.

En eWriter, mi MDI textwriter (el software descendiente de la antigua hardware de la maquina de escribir), puse una ventana (numero asignado en la carga y actualiza cuando un archivo con un numero inferior esta cerrado) en la barra de estado, junto con el archivo de bytes de tamaño. Hacer clic en la barra de estado obtendra el 'siguiente' en el archivo de carga-orden (el lado superior de la ventana de numero). Para saltar, yo uso el viejo Turbo Alt TopNum# para la ventana de #1..#9. Alt TopNum#0 se presenta un cuadro de dialogo que tengo en el menu de la Ventana (por encima del valor predeterminado de la lista de seleccion). Este cuadro de dialogo ofrece rutas de acceso completa y una lista de seleccion. Si el usuario no esta seguro de que Alt # el o ella quiere, Alt 0 y haga clic en el nombre de la ruta y otro en el boton Go no retrasar el salto mucho.

El siguiente codigo implementa (en TextEdit) un sencillo sistema de seguimiento que realiza un seguimiento de la ventana de los numeros y los archivos adjuntos. Yo lo he puesto en un simple visor de modo que usted puede 'comprobar' la ventana de numeros despues de su se abre, se cierra, y arrastrando los pies. No se por que 'z-stack' orden seria util, pero se puede ver que la forma mas sencilla de comprobar el archivo/numero de conexion tambien refleja el orden-z en el visor.

Nota: En la configuracion de la Baldosa Top 2 de N de Windows en mi Selectivo Mosaico en MDI Editores, no puse en el manejo de 'sin titulo' los archivos, ya sea antes o despues de Guardar lo que pone en una ruta de acceso. En SavingAs1Click, yo no agregar el nuevo archivo a OpenFiles. Y yo en ninguna parte nada acerca de un 'sin Titulo' que no tiene ninguna ruta. Si el 'sin Titulo' es uno de los dos, que no causa ningun problema. En el siguiente codigo, que incluyen un SaveAs1Click que pueden ser incluidas en el suelo de Baldosas articulo del codigo. Si desea guardar el nuevo archivo se coloca en la OpenFiles y esta incluido en todos los procesos. Si usted tiene un inconverso 'sin Titulo' en el Archivo, sin embargo, tendra efectos extraños (como lo hacen ahora, si el archivo se guarda o no). El Baldosa Top 2 de N de windows se ignoran. Se mostrara en el suelo de baldosas. La perdida de Restaurar el tamaño no es uno de los efectos extraños. Que es causada por la Tile1Click que me llame en Baldosa Top 2 de N de windows.

Codigo:

En el uso de TextEdit como un banco de pruebas para el MDI Editor de Texto el desarrollo
estoy haciendo en estos articulos, algunos propiedades necesita ser ajustado.
Estos son:

TOpenDialog Opciones/ofAllowMultiSelect: True

TEditForm WindowState: wsmaximized

En MDIFrame.pas, declarar un mundial (seccion de Interfaz) variable denominada
EditTag que se utiliza en las versiones modificadas de New1Click y
Open1Click. OpenFiles, usado mas tarde, tambien se declara y se
inicializa.

TFrameForm
...
var
...
EditTag: longInt
OpenFiles: TstringList

Inicializacion
...
OpenFiles := TStringList.Crear
OpenFiles.Text := '

El Open1Click y New1Click rutinas de proporcionar un valor para EditTag
antes de cada apertura. El valor sera puesto en EditForm la etiqueta
variable (En su FormCreate de rutina). Esto asegurara que cada
editor tendra una ventana de numero.

procedimiento TFrameForm.New1Click(Sender: TObject)
begin
LockWindowUpdate(Asa)
EditTag := MDIChildCount 1
TEditForm.Create(Self)
LockWindowUpdate(0)
fin

procedimiento TFrameForm.Open1Click(Sender: TObject)
var
i: integer

begin
si OpenFileDialog.Ejecutar, a continuacion,
LockWindowUpdate(Asa)
For i := 0 a OpenFileDialog.Los archivos.count - 1 do
begin
EditTag := MDIChildCount 1
con TEditForm.Create(Self) no
Abrir(OpenFileDialog.Archivos[i])
fin
LockWindowUpdate(0)
fin

En TeditForm (MDIEdit.pas), todo el seguimiento es tomado cuidado de. En
FormCreate, copia EditTag en la Etiqueta:

procedimiento TEditForm.FormCreate(Sender: TObject)
begin
Ruta de acceso := DefaultFileName
la Etiqueta := EditTag
fin

EditTag es la secuencia de carga) de la Ventana de Numero. Este se mantendra en
EditForm la Etiqueta de variable. Estos numeros almacenados se 'mudo'
cuando un editor con un numero inferior esta cerrado. Ahora, podemos construir en nuestra
verdadero motor de seguimiento utilizando TEditForm.Cerrar. Esta rutina utiliza el
OpenFiles fconnectionlog yo he declarado en MDIFrame.pas.

procedimiento TEditForm.FormClose(Sender: TObject var Accion: TCloseAction)
var
i, j: LongInt
CloseTag: integer

begin
CloseTag := Etiqueta
para j := 0 a (FrameForm.MDIChildCount - 1)
con FrameForm.MDIChildren[j] como TEditForm hacer
begin
si la Etiqueta > > CloseTag, a continuacion,
la Etiqueta := Tag - 1
fin
for i := 0 a OpenFiles.Count - 1 do
si OpenFiles[i] = Ruta de acceso, a continuacion,
begin
OpenFiles.Eliminar(i)
break
fin
Accion := caFree
fin

procedimiento TEditForm.Saveas1Click(Sender: TObject)
begin
SaveFileDialog.FileName := Ruta de acceso
si SaveFileDialog.Ejecutar, a continuacion,
begin
Ruta de acceso := SaveFileDialog.Nombre de archivo
Caption := ExtractFileName(PathName)
OpenFiles.Insertar(Etiqueta, Pathname) // lista nueva Ruta de acceso
Save1Click(Remitente)
fin
fin

Ver Resultados:

Nota: El visor de elemento de menu se establece a continuacion parece ser la causa del defecto de la lista de seleccion de abandonar, al menos en Delphi 5. He jugueteo con los Selectores de dentro y fuera. Usted podria querer jugar con el y ver si usted puede conseguir el editor de texto de la lista de seleccion para la transposicion de la z-pila antes de ver seguimiento de windows. Usted podria tener que Restaurar windows a tamaño pequeño para mezclar el orden z tirando de windows. Esta es, probablemente, solo en D5 (no D2-D4) que se encarga del menu de creacion en una forma que yo aun no muy cogido el tranquillo. Sin duda, estoy de reconstruir el menu de la Ventana por encima de la predeterminada de la lista de seleccion en eWriter escrito por primera vez en Delpi 3 y migran a traves de Delphi 4 a 5.

queremos un 'visor' para ver los resultados de nuestra asignacion y seguimiento
de la Ventana de Numeros como abrir, cerrar, y shuffle (z-stack) de windows.
En la parte inferior de la Ventana de opciones del menu de la lista, agregar un nuevo elemento de menu:

Titulo: Ventana de Asignacion de Numero de Lista

Nombre: WinNumList1

de la Ficha Eventos y haga doble clic en OnClick. A continuacion, rellene
el controlador de eventos para crear esta rutina:

procedimiento TFrameForm.WinNumList1Click(Sender: TObject)
var
i, j: integer
Lista: tstringList
S: string

begin
// Esta rutina es un poco complicada para la captura de 'los Nuevos Archivos'
Lista := TSTringList.Crear
de la Lista.Add ('Ultraperifericas de la Ventana en la parte superior,' Z-stack 'orden' #13)
For i := 0 a (MDIChildCount - 1)
Begin
S := 'la Ventana Numero' IntToStr(MDIChildren[i].Tag)
si MDIChildren[i].Caption = DefaultFileName, a continuacion,
begin
S := S '' MDIChildren[i].Titulo
de la Lista.Agregar(S)
fin
else
begin
para j := 0 a (OpenFiles.Count - 1)
si pos(MDIChildren[i].Titulo OpenFiles.cadenas[j]) <> 0 then
begin
S := S '' OpenFiles.Cadenas[j]
de la Lista.Agregar(S)
break
fin
fin
fin
messageDlg(Lista.Texto, mtInformation, [mbOK],0)
de la Lista.Libre
fin

Aqui esta una mirada en el resultado:

Nota: Para ver los usos de esta ventana numero de seguimiento en el complejo tapiz de mundo real de la ventana de manejo, podria jugar con mi eWriter textwriter. No solo es freeware, pero no se instala a si mismo en la tela de un sistema. Es facil jugar con. Cada abrir el editor tiene su Ventana de Numero en la barra de estado. Hacer clic en la barra de estado se presenta la siguiente ventana numero de editor. Alt TopNum# (1..9) se presenta la ventana que se numeran de 1..9. Alt TopNum0 obtiene una ruta de acceso completa lista pic, aunque el titulo por defecto solo de lista de seleccion en el menu Ventana para poco mas rapido de picking. (La ruta de acceso completa de la lista de seleccion esta por encima de ella en el menu.) 0.C, que se estrenara en junio de 2001, se han ventana de numeros en el nombre de ruta de acceso de la lista de seleccion como consecuencia de mi forma de escribir este articulo.

Entrelazado Bibliografia

empece ad-libbing estos articulos en hacer algunas de las cosas que puedo hacer
en eWriter en el Delphi demo TextEdit (de la que he construido eWriter).
Es natural a acumular todas estas en una copia de la edicion de textos. Y
puede que tenga que ir de ida y vuelta a llenar de nuevo, perdidas, o
cambio rutinas de compatibilidad. Caja notas que aparecen la mayoria de los lugares. Figura
es en la 'tienda' conversacion...