{--------------------------------------------------------}
{    Programa WordUtil
{    Variáveis globais
{--------------------------------------------------------}

unit WuVars;

interface
uses Wintypes;

var Minha_Jan, Jan_Prog: hwnd;              { janelas em execucao }
    palavra :array [0..20] of char;         { palavra marcada }
    modulo : string [10];                   { modulo em execussao }
    passagem: integer;
    novo: boolean;                          { se abriu um novo }
    Nome_Arq: string;                       { nome do arquivo }
    Tipo_Arq: string;                       { extencao do arquivo }
    Novo_Modulo: string [10];               { novo modulo de execucao }
    Clip_Board: array [0..8000] of char;    { minha area de transferencia }
    novClip_Board:array [0..8000] of char;  { area de transferencia temporária }
    meuNome: array [0..100] of char;        { título desta janela }
    monitorAtivo: boolean;                  { para cancelar o monitvox }
    janOriginal:hwnd;
implementation
end.