[Notes2-team] =?iso-8859-1?Q?Re:_=5BNotes2-team=5D_RES:_=5BNotes2-team=5D_Re:_=5BNotes2?= =?iso-8859-1?Q?-team=5D_Re:_=5BNotes2-team=5D_Uma_=FAltima_id=E9ia=2C_sta?= =?iso-8859-1?Q?tus=2C_entrevista?=

[Daniel R. <dan...@ya...>]

%$=A8#&=A8%%$$!!!!!
E EU N=C3O TO NERVOSO!!!

:)

S=F3 pra me fazer passar por palha=E7o, recompilei agora a DLL sem =
alterar nadinha e tava funcionando... :|

S=F3 precisei mesmo da dica do Jonas pra ele pegar todas as letras, pois =
acabava comendo a ultima, mas a fun=E7=E3o tava funcionando... =
brincadeira n=E9!


Temos a atual situa=E7=E3o do Shell Ext... quem tiver algo a contribuir, =
favor entrar em contato:

    "Editar com o Notes"
      Executa 'NotesExe + ' "' + fFileName + '"';
   =20


    "Usar como Template do Notes"
      executa 'NotesExe + ' -t "' + fFileName + '"';
=20
    "Salvar como template do Notes"
       ?????
   -----------------Separador----------------------------
  =20
    "Copiar conte=FAdo"
    begin
      aFileContent :=3D TStrings.Create;
      aFileContent.LoadFromFile(fFileName);
      SetClipboardText(PChar(aFileContent.Text));
      aFileContent.Free;
    end;
    Queria descobrir se o codigo acima funcionava, ou se o Text ia =
retornar sem os caracteres $A e $D. Mas nem consegui descobrir pois =
trava o explorer... o fato =E9 que o compilador do delphi da um monte de =
warnings sobre usar TStrings nesse c=F3digo. Algu=E9m tem rotinas ae pra =
ler o arquivo direto do disco, linha a linha?

   "Copiar nome do arquivo"
    begin
      SetClipboardText(fFileName);
    end;
    Agora funciona!!!


    "Informa=E7=F5es do arquivo"
        Ainda n=E3o implementado, mas parece que =E9 Notes.exe -i
        =E9 isso mesmo??

    os items abaixo, exceto o da Home Page, n=E3o sei se j=E1 est=E3o =
implementados no Notes... algu=E9m ae me informa, please??

  //7: -----------------Separador----------------------------
  //8: //Compilar arquivo
  //9: //Comprimir HTML
  //10:-----------------Separador----------------------------
  //11://Adicionar aos favoritos do Notes
  //12:-----------------Separador----------------------------
    13: // "HomePage do Notes"
      =
ShellExecute(GetDesktopWindow,nil,'http://notes.codigolivre.org.br',nil,n=
il,SW_MAXIMIZE);
  end;



[]=B4s

Daniel Roma
#Equipe do Notes - Desenvolvimento
  ----- Original Message -----=20
  From: Jonas Raoni Soares Silva=20
  To: not...@li...=20
  Sent: Friday, December 05, 2003 2:11 AM
  Subject: [Notes2-team] RES: [Notes2-team] Re: [Notes2-team] Re: =
[Notes2-team] Uma =FAltima id=E9ia, status, entrevista


  Eu testei aqui e funcionou blz Daniboy huhu... Soh encontrei um =
problema
  referente a aloca=E7=E3o de mem=F3ria (vc tava alocano espa=E7o para X
  caracteres qdo deveria alocar pra X+1, devido ao caracter nulo, o q
  acabava cortano o =FAltimo caracter... )

  Para tentar simular o q vc tem ae, eu coloquei a fun=E7=E3o numa dll e =
at=E9
  especifiquei ela como seno stdcall pra ficar o mais windows poss=EDvel
  haha... Obs: soh usei a unit windows :]

  Dae eu inseri ela no meu prog de forma est=E1tica e din=E2mica, foi =
numa
  boa... Eu perguntei pro Anderson e ele disse q funfou blesma com ele
  tb... Vai ver o seu delphi tah com viadagem hahaha :]

  Eskece essa parte ae kra e vai continuano o projeto... Se preciso for,
  adicione a unit clpbrd mesmo q temporariamente... Dae qdo tiver mais
  tempo vc ca=E7a o q tem de errado, deixa um coment=E1rio grand=E3o =
hehe ;]

  Soh mexi no Data :=3D GlobalAlloc...

  "Data :=3D GlobalAlloc( GMEM_MOVEABLE+GMEM_DDESHARE, Length( aText )+1 =
);"

  []'s

  Jonas Raoni Soares Silva
  ----------------------------------
  #Equipe do Notes - Desenvolvimento


  -----Mensagem original-----
  De: not...@li... [mailto:notes2-team-

  Infelizmente anderson n=E3o tamos falando de 30 K... tamos falando de =
uma
  DLL que j=E1 t=E1 com 166 Kb Sem Todo o c=F3digo implementado, e que =
colocando
  o Clipbrd no uses pula pra 406Kb... mais que o dobro s=F3 por causa =
dessa
  unit...=20

  N=E3o me conformo de n=E3o conseguir uma solu=E7=E3o simples via =
API... :(


  []=B4s

  Daniel Roma
  #Equipe do Notes - Desenvolvimento




  -------------------------------------------------------
  This SF.net email is sponsored by: SF.net Giveback Program.
  Does SourceForge.net help you be more productive?  Does it
  help you create better code?  SHARE THE LOVE, and help us help
  YOU!  Click Here: http://sourceforge.net/donate/
  _______________________________________________
  notes2-team mailing list
  not...@li...
  https://lists.sourceforge.net/lists/listinfo/notes2-team


  ---
  Verifica=E7=E3o de V=EDrus executada:
  Nenhum v=EDrus encontrado!
  Sudeste Seguran=E7a e Transporte de Valores
  Departamento de Tecnologia e Informa=E7=F5es
  Checked by AVG anti-virus system (http://www.grisoft.com).
  Version: 6.0.547 / Virus Database: 340 - Release Date: 2/12/2003