mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: App lanciata da utenti sotto dominio

Ciao a tutti.
Supponiamo di avere diverse istanze di una certa applicazione che girano 
su macchine diverse e che devono condividere una cartella dove 
leggere/scrivere file comuni a tutte le istanze.
Supponiamo anche che gli utenti che lanciano questa applicazione siano 
"sotto dominio" e che quindi facciano il login su Windows XP ognuno con 
un utente diverso dagli altri.
Supponiamo infine che la cartella condivisa risieda su una macchina a 
parte e per nessuna ragione al mondo gli utenti "normali" possano 
accedere ad essa.
Per rendere la cartella condivisa accessibile a tutti questi utenti (ma 
*solo dall'applicazione*, non da explorer) avevo pensato di assegnare a 
tale cartella i privilegi di Administrator e poi di lanciare 
l'applicazione con i privilegi di Administrator.
Il metodo "Esegui come..." di Windows è improponibile perche' richiede 
la password di Administrator, che naturalmente non puo' essere 
comunicata a tutti gli utenti, altrimenti chiunque potrebbe accedervi 
con explorer. Voi avete qualche idea?
MT

la butto li xche di sistemistica so poco..
Qualche impostazione di Active Directory?
-- 
Alberto Salvati
A NEAPOLITAN Delphi Developer who is studying c# and .net
"Dicette 'o pappece 'nfaccia 'a noce dammi 'o tiempo che pure te spertoso"

 ha scritto nel messaggio 
news:da14ln$j86$1...@newsreader2.mclink.it...


 l'applicazione con i privilegi di Administrator.
Non credo che il tuo approccio possa funzionare: il sistema di authority di
winzozz ragiona per utenze, di conseguenza e' una cosa improbabile
aggiungere nei criteri di protezione della cartella il tuo programmino, in
quanto esso essendo un'instanza di un utente, si porta dietro i privilegi
dell'utente stesso.
Ad una cartella puoi dirgli che puo' accedervi l'utente pippo, non il
programma xyz... Se il programma sta girando sulla macchina dove e' loggato
pluto, e cerchera' di aprire la tua cartella, esso si presentera' al
sistema come "pluto".
Ti pregherei di verificare magari in un altro ng queste mie affermazioni,
siccome non sono un sistemista e non ho mai fatto certificazioni in tal
senso non vorrei averti detto delle corbellerie...
ciao!
-- 
Morde. 
ICLDweb: 
http://www2.samatel.com/icld/
Newsgroup: it.comp.lang.delphi
Titolo: clipbo

il piccolo programmino che ho creato mi permette di ascoltare file wav
caricando un txt in un combobox con la lista degli wav contenuti nella
cartella..
vorrei ora che alla pressione del tasto button5 il file che in quel momento
è visualizzato nel testo del combobox si copiasse nella clipboard in modo da
poterlo incollare senza andare nella cartella..
già che cisiamo ditemi pure come si fà a copiare il testo alla pressionne
del button6..
grazie
erik

 ha scritto nel messaggio
news:AWJB9.19285$744.6...@news1.tin.it...

per copiare negli appunti copia il testo in un edit poi usa il metodo
copytoclipboard dell'edit
altrimenti cerca un'API adeguata
se vuoi che il testo venga copiato sia premendo il button 5 ke button 6
puoi: o creare una procedura che riceve in input una stringa da copiare (ke
ti consiglio), oppure alla pressione del bottone6 chiama  il metodo
button5.clic

 ha scritto nel messaggio
news:WDPB9.8375$Ka3.2...@twister1.libero.it...


 "edit1.copytoclipboard"
io intedenvo quello che hai fatto.. il metodo copytoclipboard dell edit

 > fatto così


Newsgroup: it.comp.lang.delphi
Titolo: HELP: sono nuovo, documentazione?

Ciao, mi appresto ad apprendere da zero DELPHI5, potete aiutarmi con link e/o
documentazione in italiano per capirne di +?
grazie,
filippo
email: 
fg...@tiscali.it
-- 
Posted from  [62.211.164.48] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:0450e4dd8fefcfa1298...@mygate.mailgate.org...


 ha scritto nel messaggio
news:3NlU7.21837$o9.7...@news1.tin.it...


 filippo
Ciao e auguri, Antņ.

Newsgroup: it.comp.lang.delphi
Titolo: Label e mouse

ma le label in delphi 5 non hanno gli eventi onMouseEnter e onMouseExit ?
mi sembra che le versioni precedenti li avevano..
non dovrò mica fare ogni volta un controllo sulle coordinate del mouse
nell'evento OnMouseMove.
grazie
--
Gna...@Wappi.com
ICQ# 76488613


Approfitto per aggiungere il tuo ICQ# nella mia contact-list, spero non ti
dispiaccia...daltronde se lo hai postato... :)
PS: Al limite prova a vedere nelle RX qui non le ho e non mi ricordo se
esistono gli eventi che ti interessano...
CIAO!

 nell'evento OnMouseMove.
No, non ci sono mai stati quegli eventi...
Cmq la via pulita (e semplice) è quella di derivare, gestire CM_MOUSEENTER e
CM_MOUSELEAVE e aggiungere i gestori di evento (8-10 righe in tutto
direi)...
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply

 "cursor"...
...non ho mai detto questo...
mi serviva per cambiare il colore all'uscita o all'entrata del mouse sulla
label.
com grazie

very very very grazie
--
Gna...@Wappi.com
ICQ# 76488613
Newsgroup: it.comp.lang.delphi
Titolo: Caratteri ASCII.

Esistono le istruzioni per ricavarsi da un carattere il n° di carattere
ASCII corrispondente e da n° di carattere ASCII al carattere corrispondente.
Grazie!

 ASCII corrispondente e da n° di carattere ASCII al carattere
corrispondente.
var b:byte;
    c:char;
begin
b:=ord(c); // ottineni il codice ascii
c:=char(b); // ottieni il carattere
end

 ha scritto nel messaggio
news:aci209$pjtn6$1...@ID-134361.news.dfncis.de...

Newsgroup: it.comp.lang.delphi
Titolo: Vendo.

Vendo Big Jim usato poco, karateka con piccola incavatura
sull'alluce destro causa caduta.
offerta libera.
--
Posted from 
relay.pantheon.it
 [195.62.36.241]
via Mailgate.ORG Server - 
http://www.mailgate.org



Newsgroup: it.comp.lang.delphi
Titolo: banalità

URGENTE
Scusate, sono un programmatore di C++ che su sta avvicinando
al Delphi...
vorrei sapere se esiste una istruzione simile alla
ZeroMemory() del C++.
Praticamente io dovrei (in Delphi) azzerare una struttura...
grazie anticipatamente

 ZeroMemory() del C++.
ZeroMemory non e' una funzione C++, e' un'API Windows.
Quindi la trovi anche sotto Delphi.
-- 
Posted from  [80.105.34.80] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:7f90bae7acaddba9d6d...@mygate.mailgate.org...


ZeroMemory(@struttura, sizeof(struttura));


Quindi la trovi anche sotto Delphi.
In Delphi c'è FillChar, si usa come la memset di C
-- 
Nato nel vizio, morto nel supplizio
Nato nel peccato, ad entrare sia invitato

 #define RtlZeroMemory(Destination,Length) memset((Destination),0,(Length))
ZeroMemory, ribadisco, e' un'API di Windows.
Non mi importa come sia implementata internamente e
come sia possibile riprodurre il meccanismo interno
con FillChar.  E' sempre meglio usare le API Windows 
al posto di funzioni predefinite.
L'OP vuole usare ZeroMemory e in Delphi lo puo' fare
senza problemi.


al posto di funzioni predefinite.
Scusa Andrea, una curiosità...ti andrebbe di spiegarmi perchè?
Immagino che sia una questione di velocità..
----
Lawrence "Rhymes" Oluyede
rhy...@myself.com

Immagino che sia una questione di velocità..
Uno dei tanti vantaggi e' che, in molti casi, il codice
prodotto e' molto piu' compatto.  In fondo, richiami una
funzione presente nelle librerie di sistema e non la linki
staticamente al tuo programma.

staticamente al tuo programma.
In pratica dato che la maggior parte delle funzioni Delphi sono
wrappate intorno a funzioni API Win32, è ovvio che saltare il "passo"
intermedio incrementa le prestazioni dell'applicazione.. E' giusto il
mio ragionamento?


mio ragionamento?
Non necessariamente.
Bisognerebbe fare dei benchmark, per mettersi al sicuro.
Comunque, una funzione come FillChar, difficilmente viene
wrappata su un'API Windows.  Conviene, generalmente, usare
l'assembler built-in, come (penso) faccia Borland.

L'OP vuole usare ZeroMemory e in Delphi lo puo' fare senza problemi.
Anche se è la soluzione sbagliata? :)


Anche se č la soluzione sbagliata? :)
Non vedo su che base tu possa dire che e' la soluzione
sbagliata.  Ora darai il via alle tue solite elucubrazioni,
ma non staro' a sentirti, per cui, se vuoi che ti dia
ragione, te la do' e chiudiamo.  Non ho intenzione di
discutere con chi ribatte persino a una questione cosi'
semplice come l'uso di un'API particolare.
Newsgroup: it.comp.lang.delphi
Titolo: Variants: perche' questo funziona in Delphi 5 e non in Delphi 6?

L'ho scritto in inglese perche' postato anche in altri newsgroups:
I installed an activeX control component by SAP R/3
It works perfectly in Delphi 5 but doesn't work with Delphi 6.
Where am I wrong?
Who can help me?
Thank you Agos
=============================================================
This is the code:
=============================================================
unit s_logon;
interface
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ExtCtrls, OleCtrls, SAPLogonCtrl_TLB, StdCtrls,Grids,Variants;
type
  TForm1 = class(TForm)
    SAPLogonControl1: TSAPLogonControl;
    Panel1: TPanel;
    StaticText1: TStaticText;
    Button1: TButton;
    procedure SAPLogonControl1Click(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    {  }
  public
    {  }
  end;
var
  Form1: TForm1;
  Connection :variant;
implementation
{$R *.DFM}
procedure TForm1.SAPLogonControl1Click(Sender: TObject);
begin
  Connection:= SAPLogOnControl1.NewConnection;
  if Connection.LogOn(0,false) = true then
  begin
    showmessage('Logged On.');
    Button1.Enabled:= true;
  end
  else
  begin
    ShowMessage('Erron on LogOn :-(((');
    SAPLogonControl1.Enabled:=true;
  end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  Connection.LogOff;
  ShowMessage('System LogOff...');
  SAPLogonControl1.Enabled:=true;
  Button1.enabled :=false;
end;
end.
=============================================================
I have this error message:
=============================================================
---------------------------
Debugger Exception Notification
---------------------------
Project logOn.exe raised exception class EAccessViolation with message
'Access violation at address 0045577F in module 'LOGON.EXE'. Read of address
FFFFFFFF'. Process stopped. Use Step or Run to continue.
---------------------------
OK   Help
---------------------------

 wrote in message
news:czmo9.18219$Fz.5...@news1.tin.it...


 ciao
======================================================
Ah, non pensavo fossero compatibili.
Infatti avevo gia' provato a confrontare i 2 pas e mi sembravano abbastanza
diversi.
Pero' adesso che ci penso Ho sovrapposto il pas della unit 5 in quello della
6 e mi sembra NON abbia funzionato.
Io pero' ti sto' parlando del *.pas ottenuto con l'import activex component
e NON project->
Import type library. Non so nemmeno se vi sia una differenza.
Grazie comunque faro' un po' di prove
Newsgroup: it.comp.lang.delphi
Titolo: Decimali su dbgrid

Con DisplayFormat si può stabilire quanti decimali visualizzare ed
editare in una colonna di un campo numerico di una dbgrid;
ma esiste un modo semplice per visualizzare i valori con decimali 
diversi a runtime in base ad un'altra colonna della dbgrid ?
Esempio:
 
Pz. | 10
Mt. | 10,12
Nr. | 10,1234
Pz. | 11
 
 
Shift

 diversi a runtime in base ad un'altra colonna della dbgrid ?
 
Devi intercettare l'evento di disegno della cella (ondrawcolumncell?), 
verificare se stai disegnando la cella della colonna interessata, poi 
con una serie di if sul tipo di articolo in riga decidi come deve essere 
formattato l'output.
 
Vado a memoria, sono anni che non scrivo più codice delphi.
 
-- 
morde
Android
QT 4.7
Delphi (5,6,7.. expired)
Firebird Database
 

 Vado a memoria, sono anni che non scrivo piï¿œ codice delphi.
 
ma se uso DisplayFormat cambia il formato della colonna e non della
singola cella
 
 
Shift
 
 

 singola cella
 
rileggi quanto ho scritto. de quello che mi stai dicendo non hai proprio 
provato.



 
Purtroppo lo devo fare con CBuilder6 e non ho l'OnDrawColumnCell ma solo
OnDrawDataCell, ma mi andrebbe bene anche un esempio delphi, poi ci
penso io;
cmq questo ï¿œ quanto ho provato:
 
if(Field->FieldName=="campo_qta")
    {
     ... //set num.decimali campo, s contiene un numero di zeri variabile
 
((TNumericField*)(Tb->FieldByName("campo_min")))->DisplayFormat="#,0."+s+";#,0."+s+";#";
    }
 
 
cosï¿œ com'ï¿œ visualizzerebbe anche bene, ma va in loop; se disattivo e
riattivo l'evento prima e dopo il cambio del displayformat lo applica
a tutta la colonna.
 
 
Shift

 a tutta la colonna.
 
Mmm la proprietï¿œ DisplayFormat ï¿œ statica?? O meglio, agisce sulla Locale 
e quindi ï¿œ globale?
 
Se non ne esci, cambia il formato del campo (cioï¿œ della colonna) e 
rendilo stringa, e formattalo nel modo corretto utilizzando la stessa 
procedura.



Puoi agganciarti all'evento OnGetText dei Field:
 
// non testato
procedure TMyDM.MyQueryQtyGetText(Sender: TField;
  var Text: String; DisplayText: Boolean);
begin
  case Sender.DataSet.FieldByName('UM').AsInteger of
  UM_MT:
    Text := RoundTo( Sender.AsFloat, -2 );
  UM_NR:
    Text := RoundTo( Sender.AsFloat, -4 );
  UM_PZ:
    Text := RoundTo( Sender.AsFloat, 0 );
  // eccetera
  end;
end;
 
ciao
Giacomo
 
 
 
 
 

 procedura.
 
ci ho pensato ma devo lavorare su una tabella virtuale, non posso
cambiare quella fisica, ora vedo se ne vale la pena.
 
Grazie
 
Shift

 cambiare quella fisica, ora vedo se ne vale la pena.
 
Si stavo proprio parlando proprio della tua tabella "virtuale", non di 
quella fisica. E' ovvio che quella fisica non deve essere toccata ;)

Newsgroup: it.comp.lang.delphi
Titolo: Modificare la data di sistema

Scusate ma non ho avuto risposte, cosi' ci riprovo:
E' possibile modificare la data di sistema da un'applicazione?
Meglio ancora e' possibile cambiare solo l'anno lasciando
inalterato tutto il resto?
In deplhi non ho trovato nulla, nelle API ovviamente si,
ma la sintassi mi ha solo confuso le idee (privilegi? come si
gestiscono i privilegi?).
Qualche aiuto concreto?
Grazie.
- Mariano.-

Ciao Mariano,
Mariano La Via ha scritto:

con la "SetSystemTime" (API) si può cambiare la data e l' ora di sistema sia
in Win95 che in Win NT.
Tu parlavi di privilegi ?
Bè, io uso Win95 e non dovrei avere i problemi di privilegi che invece
esistono in Windows NT ma dovresti riuscire ad uscirne utilizzando l' API
"AdjustTokenPrivileges" che però dovrei provare per darti un aiuto pratico.
Al limite dovrei avere un codice d' esempio che utilizza i privelegi per
chiudere Windows tramite la ExitWindows o roba simile.
Per gestire i privilegi usa sempre "AdjustTokenPrivileges". Da li credo che
con un po' di buona volontà riuscirai ad utilizzare lo stesso esempio
applicato al tuo codice (magari cambiando qualche flag dopo aver consultato
il Win32 Sdk)....Ok ?
Fammi sapere.....ciao !!
Antonio Tarolla
BSSoftware Tips Mailing - List Support

esistono in Windows NT ma dovresti riuscire ad uscirne utilizzando l' API
Scusa, mi ero spiegato male e comunque ho risolto il mistero.
Posto il codice cosi' mi spiego meglio:
var
   SysDate: TSystemTime;
begin
   GetSystemTime(SysDate);
   if ParamCount>0 then begin
      SysDate.wYear:=StrToInt(ParamStr(1));
      SetSystemTime(SysDate);
   end; //if
end.
facendolo girare la data mi restava sempre invariata e, non trovando
errori, pensavo che fosse un problema di privilegi, anche se su Win98
non avrebbero dovuto esserci.
In realta' il problema era il parametro!!
Pare che Windows nella data di sistema non accetti anni superiori al
2099, mentre io per fare le prove usavo cifre alte come 2500, 3000,
4000. A casa di MS saranno impazziti o lo fanno apposta?
Detto cio' mi e' sorto un dubbio:
per quanto piccolo, tra il momento in cui leggo l'ora e quello in cui
la riscrivo passa un intervallo di tempo.
Posso scrivere la data senza scrivere l'ora?
Posso monitorare il tempo trascorso per apportare una correzione
e correggere l'errore?
- Mariano.-

e correggere l'errore?
Per monitorare il tempo trascorso, prova con la GetTickCont. Ti basi sulla
differenza tra "l' ora" prima del settaggio e l' ora dopo il settaggio.
La GetTickCount restituisce il tempo in millisecondi da quando è stato
avviato Windows !!
Ok Mariano, ora ti saluto.
Ci sentiamo ...... continuerò a seguire questo thread nei prossimi giorni.


avviato Windows !!
Puo' essere un'idea.
Ci studio un po' nei prossimi giorni.
Ciao e grazie.
- Mariano.-
Newsgroup: it.comp.lang.delphi
Titolo: Manuale Database

Le mie curiosità di novizio si stanno rivolgendo al Database con Delphi2
Sapete se su internet si trovano manuali o tutorial sull'utilizzo dei
Database con Delphi?
Grazie

http:\\.
delphi.about.com
 (in inglese)
c'è un ricco tutorial sull'uso dei DB con Delphi per principianti
Saluti
Andrea
----------------------------------------------
<< Dubito, quindi potrei essere >>
-----------------------------------------------

 Saluti
Ricambio i saluti
Newsgroup: it.comp.lang.delphi
Titolo: programma per scambiare voce in una rete aziendale

buongiorno a tutti!!!!
allora io sono uno studente al 5 anno dell'itis armellini.
vorrei portare agli esami di maturità un progetto in delphi che
permette a due client o piu di comunicare scambiando invece che
messaggi testuali voce in streaming voi sapete come aiutarmi?????
vi prego non esitate a rispondermi grazie mille

vi prego non esitate a rispondermi grazie mille
	Ciao
	MassimoB
 
---------------------------
http://www.massimobeschi.it/

 messaggi testuali voce in streaming
E sti cazzi!
Io non so aiutarti, ma sicuramente questa cosa ti sarà molto utile in
futuro... e se ci riesci ti darà dei voti altissimi :)
In bocca al lupo e non perderti mai d'animo!
-- 
Jax
====
"Messaggio di errore: la tua password deve essere di almeno 18770 caratteri
e non può ripetere alcuna delle tue precedenti 30689 password"
dalla Microsoft Knowledge Base

 E sti cazzi!
scusa? ;-)
volevi forse dire acciderbolina? o mannaggia alla puzzola? ;-)
-- 
Coltiva linux, che tanto windows si pianta da solo!
Linux registered user: 364664 (
http://counter.li.org
)

 volevi forse dire acciderbolina? o mannaggia alla puzzola? ;-)
No, no, proprio sti cazzi! O, se preferisci, steek hatzeč :)
-- 
Jax
====
La saggezza č per l'anima ciň che la salute č per il corpo.

No, no, proprio sti cazzi! O, se preferisci, steek hatzeč :)
Jax, sei un mito... ahahahahha mi sto spanciando sulla scrivania dell'ufficio!
ROOOOOOOOOOOOOOOOOTFLLLLLLLLLLLL!!!!!!
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

vi prego non esitate a rispondermi grazie mille
Come no, se hai altro da chiedere insisti pure qui dentro.
:)
Ciao e auguri per lo sviluppo.


Ciao e auguri per lo sviluppo.
Una cosa mi sono dimenticato : la suite professionale AsyncPro di turbopauer,
ora open surs, contiene anche componenti e demos per il VOIP.
A questo link ci sono diversi post dei gruppi di discussione (ora defunti)
dell'ex turbopauer: 
http://tinyurl.com/46gnl
Su questo link invece ci sono TUTTI i progetti opensurs di turbopauer:
http://www.bsdg.org/resources/turbopower.html
non badare al mio english (anzi.. inglisc!) stamane va cosi', e' lunedi' e il
capo ancora non mi ha cazziato ne' multato perche' perdo tempo su usenet
invece di produrre dell'ottimo codice delphi...
Ciao


 tempo su usenet invece di produrre dell'ottimo codice delphi...
Non ti preoccupare, al massimo facciamo una "fondazione Morde" ;)
Oppure ti assumiamo come mascotte ufficiale, rende bene sai?
Ti ci vedo bene ai delphi day con il testone di delphi 1... oppure con il
costume da development superhero di delphi 2005 :D ROTFL
-- 
Jax
====
Quel che al mondo ascolta più stupidaggini è forse un quadro da museo.
(Edmond e Jules de Goncourt)
Newsgroup: it.comp.lang.delphi
Titolo: Come faccio??

Salve anch'io come molti sono una neofita
volevo realizzare un archivio ed un controllo sui dati
contenuti in esso un po' come un motore di ricerca sulla tabella che ho
realizzato , la tabella è composta da stringhe
e vorrei fare la ricerca su queste stringhe...
spero che qualcuno mi aiuti
grazie..!:o))))
Alessia

, 
alessi...@geocities.com
 
says...


Newsgroup: it.comp.lang.delphi
Titolo: carattere di fine stringa

ho un file di testo. Devo fare una lista tipo:
asfdafa
sadfsdfs
sadgfsfg
czxvsfvs
sagfasg
il problema e' che quando faccio il read(file,record) mi restituisce tutto
il file su una sola riga
come faccio per farlo andare a capo? ho provato anche con il carattere #13
(va a capo pero' quando faccio il read e' la stessa cosa). Aiutatemi per
favore

, Skyline 
(
petr...@libero.it
) proferì le seguenti parole...

Dichiari il file di tipo TextFile (Text in Turbo Pascal, File of Char in 
Standard Pascal), scrivi una linea con il ritorno a capo con:
writeln(file,stringa) 
e leggi una linea con 
readln(file,stringa)
la stringa non deve contenere il ritorno a capo in fase di scrittura.
Comunque in ambiente operativo MS-DOS (e derivati), il ritorno a capo è 
la coppia #13#10 e non solo #13.
-- 
|-----------------------------------------------|
|Davide Guida          >>> 
davide...@email.it
|
|-----------------------------------------------|


Dichiari il file di tipo TextFile (Text in Turbo Pascal, File of Char in
Standard Pascal), scrivi una linea con il ritorno a capo con:
writeln(file,stringa)
e leggi una linea con
readln(file,stringa)
la stringa non deve contenere il ritorno a capo in fase di scrittura.
Comunque in ambiente operativo MS-DOS (e derivati), il ritorno a capo è
la coppia #13#10 e non solo #13.
GRAZIE 1000.... HO RISOLTO DICHIARANDO IL FILE CON TEXTFILE

 GRAZIE 1000.... HO RISOLTO DICHIARANDO IL FILE CON TEXTFILE
Hai quotato (male) l'intera discussione per un semplice ringraziamento.
Fai piů attenzione la prossima volta, magari leggi qui:
http://www.krisopea.it/mvp/Quoting.htm
Ciao! :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it
Newsgroup: it.comp.lang.delphi
Titolo: programmi esterni

ciao 
volevo sapere come posso fare per far si 
che quando clicco su un bottone
mi viene avviato il client di posta elettronica
con destinatorio settato a quello che gli passo io
grazie
ciao Marco 

con destinatorio settato a quello che gli passo io
Richiama ShellExecute passandogli 
'mailto:
de...@suodominio.it
?subject="ciao"'



l'ho cercata nell'help in linea ma non ho trovato niente circa
shellexecute

shellexecute
unit ShellAPI,
non e' una funzoine di delphi, ma un'Apidi win..
cmq basta scrivere ShellExecute e farci F1 sopra ;)
Ciao,
Alan Solo

shellexecute
Devi cercare nell'help di Win32...

si ora l'ho trovata
mi dice che vuole l'handle alla finestra corrente
ma come faccio a ricavarlo?

 ma come faccio a ricavarlo?
Form1.handle

 ma come faccio a ricavarlo?
Application.Handle, se hai una sola form
o nomeform.Handle

o nomeform.Handle
Non serve specificare l'handle della finestra.

Non serve specificare l'handle della finestra.
non è obbligatorio ma si fa

non è obbligatorio ma si fa
RIPETO : NON SERVE !
--
Walkie...@Libero.It (ICQ# 8143647)

RIPETO : NON SERVE !
il parametro hwnd non sta lě per bellezza. Non diseducare i principianti
(e comunque, 'zzo ti strilli?)
Newsgroup: it.comp.lang.delphi
Titolo: [d5][OT] come faccio a vedere le dll che usa la mia applicazione??

ciao a tutti, ho un exe che ho dato a molte persone e di cui non ho mai
avuto problemi.... oggi un clienti mi chiama dicendo che non si apre su
windows xp... ovviamente ho fatto tutti i test anche da me e si apre
tranquillamente... esiste un programma per vedere quali dll utilizza un
exe??? l'errore è quello di windows si è verificato un errore nell'exe però
non dice cosa manca...
Simo

da riga comando:
tdump nome.exe > info.txt
AS



http://www.dependencywalker.com/
è free
-- 
Lis
Il mio sito: 
http://lis.altervista.org
FAQ di it.comp.lang.delphi: 
http://snipurl.com/faq_icld

 non dice cosa manca...

grazie a tutti.. nell'elenco però sto vedendo che sono tutte dll di windows,
quando compilo il software su un pc con windows xp pro include qualcosa tipo
informazioni riguardo al service pack??? io ho il sp1 mentre il cliente
penso abbia la 1a release di xp
Simo

informazioni riguardo al service pack?
Direi proprio di no.
Che io sappia, non e' possibile da un eseguibile risalire all'environment sul
quale e' stato compilato.
Ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

Newsgroup: it.comp.lang.delphi
Titolo: MySql, blob e stream

Si supponga di utilizzare un DataBase MySql via DbExpress. Qualche
idea su come passare il contenuto di un campo blob su di uno stream e
viceversa?
Saluti
Alberto Naccari

Ho proceduto comesegue:
ho creato un TSQLCLientDataSet impostando il CommandType come ctTable
avendo tuttavia cura di filtrare la tabella opportunamente usando un CAMPO_CHIAVE:
     MioCDS:=TSQLCLientDataSet.Create(Self);
     MioCDS.DBConnection:=MIA_CONNESSIONE;
     MioCDS.CommandType:=ctTable;
     MioCDS.CommandText:=MIA_TABELLA;
     MioCDS.Filter:='CAMPO_CHIAVE='''+VALORE_CHIAVE+'''';
     MioCDS.Filtered:=True;
     MioCDS.Open;
     MioCDS.Edit;
Ho successivamente creato un TCLientBlobStream legato al campo_blob della Tabella
     MioBlobStream:=TClientBlobStream.
               Create(MioCDS.FieldByName('CAMPO_BLOB') as TBlobField, bmReadWrite);
A questo punto posso operare su MioBlobStream e finito di operare sullo stream 
posso liberare le risorse da lui allocate
     MioBlobStream.Free;
Il campo CAMPO_BLOB di MioCDS risulta modificato. Per riversare le 
modifiche sul DB opero come segue:
     MioCDS.Post;
     MioCDS.ApplyUpdates(0);
e libero le risorse allocate dal TQSLClientDataSet
     MioCDS.Free;
Cosě facendo mi pare funzioni tutto per benino.
Le dimensioni degli oggetti da inserire devono essere compatibili
con le impostazioni di MySql
MAX_ALLOWED_PACKET
ed ovviamente con la tipologia del campo utilizzato
 
TINYBLOB, BLOB, MEDIUMBLOB, LONGBLOB..
Spero in qualche commento...
Saluti Alberto Naccari
Newsgroup: it.comp.lang.delphi
Titolo: non riesco a cancellare.

ho fatto una Adoquery.
scrivendo "Delete from tabella".
ma mi da il seguente errore :
- Il provider corrente non supporta la restituzione di set di record
multipli in un unica esecuzione.

Prosegui nel thread di partenza, per cortesia.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

>> Danielito wrote

A parte il fatto che la sintassi corretta è "Delete * From Tabella",
ma come fati ad avviare la query con
1) ADOQuery.Active := True; // Che ti dà l'errore in questione
2) ADOQuery.Open;  // Ti da ancora il messaggio di errore
3) ADOQUery.ExecSQL; // Esegue la query e non dà errori

 A parte il fatto che la sintassi corretta è "Delete * From Tabella",
Potresti citare la fonte di questa affermazione?
A quanto ne sapevo io la sintassi corretta e' quella senza *, e visto 
che e' un errore molto comune metterlo, alcune implementazioni 
l'accettano come estensione al linguaggio...
ciao
Giacomo

A parte il fatto che la sintassi corretta è "Delete * From Tabella",
No, la sintassi corretta è "DELETE FROM TABELLA".  Una "delete * from
tabella" non avrebbe senso, perché lo * identifica dei campi, mentre
la cancellazione avviene a livello di record.

l'accettano come estensione al linguaggio...
Peraltro una cazzata bella e buona ;-)
Newsgroup: it.comp.lang.delphi
Titolo: interbase crc error

ciao a tutti, avendo un applicazione che lavora con DB Interbase 6, in caso
di DB rovinato esiste qualche tools che lo ripara???

devi usare il gfix da riga comando.
Prima di applicaro conviene fare un backup.
Scegli tu se fare una copia fisica del file .gdb oppure farlo via IbConsole.
Bye
A.
Newsgroup: it.comp.lang.delphi
Titolo: Terminare un task

E' possibile in Delphi tramite un algoritmo terminare un task in esecuzione?
                            Grazie per chi volesse rispondermi!!
 
Sbo...@libero.it

basta postargli il messaggio WM_CLOSE
--
Gna...@Wappi.com
ICQ# 76488613
http://gnaffy.tripod.com/

basta postargli il messaggio WM_CLOSE
Non confondiamo : "un task" non vuol dire "una finestra".
Il messaggio WM_CLOSE andrebbe spedito alla finestra gestita dal
thread primario del task, ma non e' detto che esista.
E' possibile cercare le "top level windows" legate a un task, che non
hanno "owner" e chiuderle. La loro chiusura determinera' la chiusura
delle relative "child windows" e (si spera) la chiusura
dell'applicazione. Ho appena scritto un'applicazione che tenta la
chiusura pulita di un task (in C, sotto NT), spedendo un WM_CLOSE con
SendMessageTimeout a quella che, presumibilmente, e' la finestra
legata al thread primario del programma. Nel caso non ci riesca (caso
che comprende i processi senza finestre), procede con un brutale
TerminateProcess.

Newsgroup: it.comp.lang.delphi
Titolo: Componente Usercontrol

Il sito è stato restilizzato ma non è più possibile scaricare il "core" del 
componente pur essendo ancora freeware, qualcuno lo usa? 
http://www.usercontrol.net/
  Al forum di supporto non si accede, boh...
St 

Si io.
ho provato a scaricare il componente dal nuovo sito č ha funzionato.
comunque a giorni dovrebbero rilasciare la nuova versione.
Ho anche scritto due piccole guide (senza pretese) e tradotto le costanti. 
M.Rossello
--- posted by geoForum on 
http://www.delphiedintorni.it

Newsgroup: it.comp.lang.delphi
Titolo: Codici a Barre

Ciao a tutti,
Qualcuno di voi sa dove trovare "materiale" (doc, pas, info, ecc) per
LEGGERE i codici a barre da un immagine "scannerizzata"
Grazie
Max

LEGGERE i codici a barre da un immagine "scannerizzata"
Ti posso dire che andando su google groups e cercando per "delphi barcode ocr"
(clicca qui 
http://groups.google.it/groups?q=delphi+barcode+ocr
 ) troverai
nella prima pagina questo thread
http://groups.google.it/groups?&threadm=3c8b94f4.2627109%40news.t-online.de
Spero di averti aiutato.
Ciao
-- 
Morde. 
(morde at programmer dot net)

vediamo se ho capito...
hai una immagine tipo jpeg o simile con dentro dei barcode
Tu vorresti fare tipo un ocr sui barcode e non sul testo?
Bye
A
Newsgroup: it.comp.lang.delphi
Titolo: Quando si deve approssimare in una riga di fattura ?

Salve
Avrei un dubbio su come deve essere calcoltato l'importo
in una riga di fattura.
Premessa : Il dettaglio della fattura deve essere a 4 decimali , il totale a
2 dec.
Esempio :
PRZ. NETTO = 0,0090 Euro
QTA = 53
SCONTO = 5
Quale metodo e' corretto ?
metodo uno ( approssimo alla fine ) :
53 *  0,0090 = 0,477
0,477-5%= 0,45315 APRROSSIMO a : 0,45
metodo due  ( approssimo all'inizio ) :
0,0090 -5% = 0,00855 APRROSSIMO a : 0,0086
0,0086 * 53 = 0,4558
Quale metodo e' corretto ? o... Quale e' il metodo giusto ?  ;-)
Grazie.

Salve
Avrei un dubbio su come deve essere calcoltato l'importo
in una riga di fattura.
Premessa : Il dettaglio della fattura deve essere a 4 decimali , il totale a
2 dec.
Esempio :
PRZ. NETTO = 0,0090 Euro
QTA = 53
SCONTO = 5
Quale metodo e' corretto ?
metodo uno ( approssimo alla fine ) :
53 *  0,0090 = 0,477
0,477-5%= 0,45315 APRROSSIMO a : 0,45
metodo due  ( approssimo all'inizio ) :
0,0090 -5% = 0,00855 APRROSSIMO a : 0,0086
0,0086 * 53 = 0,4558 che va Ri-Approssimato a : 0,46


 0,0086 * 53 = 0,4558 che va Ri-Approssimato a : 0,46
Nell'approssimare alla fine, esegui tutte le operazioni intermedie con la
"massima" precisione
possibile, quindi l'errore di approssimazione lo troverai solo sul
risultato.
Approssimando all'inizio, propaghi l'errore di approssimazione su tutto il
procedimento
che ti porterà al risultato finale.
Nell'esempio che fai, hai otteniamo:
Approssimando all'inizio:
53 * 0.0090 = 0.477
0.477 - 5% = 0.454285 (a te viene fuori 0.45315)
Approssimando alla fine:
0.0090 - 5% = 0.008571
53 * 0.008571 = 0.454263
Approssimando 0.008571 a 0.086:
53 * 0.0086 = 0.4558
Effettui 2 approssimazioni!
Personalmente credo che sia più opportuno arrotondare alla fine.
Spero di non aver scritto troppe fesserie :) e di esserti stato utile.
Saluti

 Personalmente credo che sia più opportuno arrotondare alla fine.
Senza nessun dubbio!
--
Jax

Questo discorso può andare bene se hai un'unica aliquota iva ma non è molto
corretto.
Se invece in fattura è usata più di un'aliquota è indispensabile arrotondare
rigo per rigo per poi fare alla fine il riepilogo delle aliquote.
Pertanto la soluzione che personalmente ho adottato, ed ha trovato
l'approvazione del commercialista di più di un cliente, è quella di
calcolare ed arrotondare ai 2 decimali l'iva di ogni rigo.
L'unico "inconveniente" è che potresti avere alla fine, nel caso in cui sia
utilizzata un'unica aliquota, un'iva che non corrisponda perfettamente
all'imponibile, ad esempio: 10.000 euro di imponibile, iva 20% 2000,01 euro,
totale fattura 12000,01 euro.
Ma questi sono gli inconvenienti dei calcoli con i decimali. :-))
Ciao,
JD


 molto corretto.
Non lo sapevo questo discorso... non si finisce mai di imparare :)
--
Jax

Newsgroup: it.comp.lang.delphi
Titolo: TDBqualcosadibuonoXmemoEDIT

Ho un campo memo in una tavola.
Vorrei un controllo sensibile ai dati che funzioni bene..
non come TDBMEMO che su una post mi da errore se il dataset si trova in
dsInsert mode (cioe' se ho fatto un'append) mentre gli va tutto bene se si
trova in dsEdit mode!!!
buio


Newsgroup: it.comp.lang.delphi
Titolo: TabControl...

Ho disegnato un oggetto TabControl della libreria CLX su una Form e dopo
aver creato i pannelli non sono riuscito a disegnare altri oggetti su ogni
pannello. Non vengono sovrapposti ai singoli pannelli. Bisogna settare
qualche proprietą del TabControl?
Non riesco nemmeno a spostarmi da un pannello all'altro. Viene soltanto
selezionato l'oggetto TabControl.
Grazie!

 pannello.
Da quello che scrivi mi sembra tu abbia bisogno di un PageControl, non ti un
TabControl.
Ciao
Gianluca

Newsgroup: it.comp.lang.delphi
Titolo: ADOCommand "server not found"

Ciao,
ho SQL Server in esecuzione sulla mia macchina.
Se mi connetto con questa usando TADOCommand tramite internet (con il mio
ip), tutto funziona. Se provo a farlo da un' altra macchina (via
internet,stesso ip) mi dice ' server not found '.
Qualcuno sa il perche'?
Spero di essermi spiegato...
Ciao!

 ha scritto nel messaggio
news:8lh19.1464$L12.1...@news.edisontel.com...

Newsgroup: it.comp.lang.delphi
Titolo: [bde] append di tabelle

ciao a tutti, avendo due tabelle TAB1 e TAB2 della stessa struttura, esiste 
un comando che mi esegue l'append su una delle due accodandomi tutti i 
record di tab1+tab2?
Simone
il db  è paradox 

Guarda il componente TBatchMove
Ciaoux 

 record di tab1+tab2?
Hai provato con SQL?
	insert into tab2 select * from tab1
In questo modo aggiunge a tab1 i record di tab2, ammesso che le due tabelle
abbiano *esattamente* la stessa struttura.
Saluti
	Marco Bortolani
	info @ 
marcobortolani.it

 	insert into tab2 select * from tab1
Ho scritto una porcheria tremenda: volevo dire
	insert into tab1 select * from tab2
;-)

grazie ma ho preferito la soluzione del tbatchmove che funziona bene
Simo

Newsgroup: it.comp.lang.delphi
Titolo: [XE 10.1 Android] - App con notifiche e processo in background

Buonasera a tutti,
prima di fare la "domanda", vi spiego cosa devo realizzare..
Semplice app Android che alla pressione di un tbutton scarica una pagina 
web da un sito, ne elabora l'html estraendo dei dati e li visualizza in 
una tabella.
Sul form principale metto anche un bottone che lancia in background un 
servizio che periodicamente dovrebbe fare la stessa di "scarico ed 
elaborazione pagina web", confronta i dati con la tabella dell'app e se 
non ci sono li aggiunge e scatena "una notifica (premendo sulla 
notifica, viene riaperta l'app).
L'idea è di memorizzare i dati in un db che viene consultato sia dal 
processo che dall'app...e fin qui credo non ci siano problemi (o altre 
vie...visto che i dati da estrarre parlando in "record" sono qualche 
centinaio al max).
La cosa che mi rende perplesso è come diavolo faccio a schedulare 
l'operazione ogni tot minuti nel servizio? Ieri avevo letto che nei 
servizi non si possono usare ttimer...è vero o è una boiata? (non 
ritrovo l'articolo purtroppo).
 
Prima di buttarmi nello sviluppo volevo qualche consiglio su come 
affrontare il problema della "schedulazione".
 
Grazie dei vostri consigli
 
Buona serata a tutti

 l'operazione ogni tot minuti nel servizio?
 
https://developer.android.com/reference/java/util/TimerTask.html
 
 
Trova l'equivalente Delphi, se proprio vuoi usare Delphi per scrivere applicazioni Android.

Newsgroup: it.comp.lang.delphi
Titolo: problemi con savedialog componente delphi

ciao a tutti qualcuno sa come posso risolvere questo problema:
io vorrei usare il componente savedialog di delphi  ma ho bisogno che non
apra la schermata di salvataggio cioe io gli passo tutti i dati quello della
directory e del nome del file da salvare a runtime ma non vorrei che lui mi
aprisse la finestra salva vorrei mandare il commando salva e che non mi
visualizzase niente
spero di essere stato chiaro nell` esposizione del mio problema qualcuno sa
come posso fare?


    Via De Gasperi, 14 - 42019
    Scandiano (Reggio Emilia)
Newsgroup: it.comp.lang.delphi
Titolo: Impostazioni del desktop

Esiste un modo per cambiare le impostazioni del desktop (risoluzione,
grandezza dei caratteri, ecc)? Grazie in anticipo.

 grandezza dei caratteri, ecc)? Grazie in anticipo.
tasto dx sul desktop, proprietà, impostazioni ... ;) sto scherzando
non so se ci sono funzioni Api (interesserebbero anche me, se c'è
qualcuno...)
oppure modifichi il registro
Ciao
Alan Solo

oppure modifichi il registro
Non ho l'SDK sott'occhio perņ ci dovrebbe essere una ChangeDisplaySettings
che vuole un puntatore ad una struttura (Devmode mi pare....) contenente le
specifiche x le modifiche da apportare!
Ciao!
--
- Carlo -

Newsgroup: it.comp.lang.delphi
Titolo: Delphi7 porte USB

Qualcuno ha usato i componenti HD Controller Suite scaricabili da
www.soft-gems.net
 ?
Ho trovato anche dei demo in allegato ma non mi funzionano. Non vedono
periferiche USB nè già collegate nè se le collego al volo.
In realtà il mio problema sarebbe questo: alcuni modelli di schede madri se
trovano all'accensione hard disk esterni o pendrive su USB non le rilevano
ed è necessario staccarle e ricollegarle.
Un cliente mi chiede di risolvergli questo inconveniente.
Sarebbe "sufficiente" un eseguibile da mettere in Esecuzione Automatica che
rilevi la pen drive o che effettui un reset della porta USB emulando
l'inserimento dell'hard disk esterno.
Avete qualche idea o qualche link utile?
Grazie
Valter

tempo fa si parlo di questo argomento.
All'epoca il problema era diverso ma + complesso, in quanto chi apri' il 
th aveva necessita di sapere COSA era attaccato alla porta.
Nel tuo caso, la cosa dovrebbe essere notevolmente + semplice.
Se cerchi su msdn dovresti trovare senza troppi problemi una pagina che 
elenca le api di windows per cio che riguarda la gestione dell'usb.
A.


Ok, faccio una ricerca
Grazie
Valter

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 7 e Win 7

Ciao a tutti, dovrei installare D7 ed alcuni suoi componenti su una macchina 
con installato Win7 64 bit.
Che voi sappiate ci sono problemi di incompatibilit�?
TNX
-- 
Lorenzo Mendini Iz2FOS - K2FOS
http://www.iz2fos.it
 (Home Page) 

 
Se non ricordo male lo devi installare con privilegi da amministratore.
Newsgroup: it.comp.lang.delphi
Titolo: errore-AIUTO

Ciao a tutti io ho un problema....premessa: sono un neofita in delphi. Cmq 
ho un problema e mi chiedevo se qualcuno di voi che ne capisce + di me 
potesse darmi una mano a trovare l'errore o meglio a risolverlo.
Ecco il codice:
var
  Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
opendialog1.Execute();
edit1.Text:= opendialog1.FileName;
end;
function ContaLinee(Ifile : string): integer;
const
  BufSize = 64720;
  LF = #10;
var
  count: integer;
  bufptr, charptr: PChar;
  numread, downcounter: INTEGER;
  F : file;
  S : string;
begin
  Ifile := form1.Edit1.Text;
  count := 0;
  GetMem(bufptr, BufSize);
  AssignFile(F,Ifile);
  Reset(F,1);
  repeat
    BlockRead(F,bufptr^,BufSize,numread);
    downcounter := numread;
    charptr := bufptr;
    while downcounter > 0 do
    begin
        if charptr^=LF then Inc(count);
        Inc(charptr); Dec(downcounter);
     end;
  until numread < BUFSIZE;
  CloseFile(F);
  FreeMem(bufptr, BufSize);
  Result := count;
  form1.Edit2.Text:= inttostr(count);
end;
procedure TForm1.Button2Click(Sender: TObject);
var
s2:string;
f2: file;
IIfile: string;
cont : integer;
righe : integer;
begin
IIfile := form1.Edit1.Text;
{$I+}
  if not FileExists(IIfile) then
    begin
    MessageDlg('Il file inserito in input non esiste.' , mtError, [mbOk], 
0);
    exit
    end;
ContaLinee(IIfile);
cont := 0;
Repeat
  Assignfile(F2,IIfile);
  Reset(F2,1);
  Readln(F2,S2); <<<<<-----ERRORE*
  cont:=cont+1;
until
  cont = strtoint(form1.Edit2.Text);
closefile(f);
end;
*[ERROR] Incopatible types: 'procedure, untyped pointer or untyped 
parameter' and 'String'
Un grazie a tutti coloro che mi risponderanno...ciao
Matt 

 untyped parameter' and 'String'
L'Help in linea (seleziono Readln nell'IDE e pigio il tasto F1)
dice che questa procedura e' definita come
procedure Readln([ var F: Text; ] V1 [, V2, ...,Vn ]);
Quindi il primo parametro deve essere una variabile di tipo TextFile e non
di tipo File (oppure devi leggere i dati con BlockRead invece di usare
Readln).
Comunque nel tuo codice ci sono diversi errori logici che richiedono
da parte tua un maggiore approfondimento. Un esempio:
function ContaLinee(Ifile : string): integer;
begin
<cut>
  Result := count;
  form1.Edit2.Text:= inttostr(count);
end;
L'ultima riga non ha senso all'interno della funzione.
Nella procedura principale farai invece:
Edit2.Text := IntToStr(Contalinee(strNomeFile));
Un consiglio: rileggi bene il codice cha hai scritto e valuta se non e' il
caso di modificare molti passaggi.
Ciao.
--
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio
Newsgroup: it.comp.lang.delphi
Titolo: [d5] trasformare un richtext in testo semplice

ciao a tutti, ho un campo memo in cui precedentemente la mia applicazione è 
stato assegnato un valore RichText, il problema è che dovrei trasformare il 
richtext in testo normale, come posso fare?
Simone 


Richedit + F1  = Plaintext
Ciao.
--
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio

il mio problema è che appena visualizzo il rich mi esce runtime error sulla 
dll del richedit2.dll.... posso estrarre il testo direttamente dal blob??
Simone 

 dll del richedit2.dll.... posso estrarre il testo direttamente dal blob??
E' meglio se riformuli il tutto perche' io non ti seguo piu' ...
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

ho alcuni record di un file db paradox che collegandoli a dei dbrichtext o 
tramite codice su trichtext mi da errore (access violation) come se il rich 
avesse caratteri strani... se lo collego ad un memo vedo i codici del rich e 
il testo che mi serve... cè un modo per filtrare senza usare trichedit il 
testo?
Simone

Newsgroup: it.comp.lang.delphi
Titolo: Database Interbase

Esiste un comando/programma che mi permetta di verificare due database che
dovrebbero essere uguali.... cioč sapere se sono contenute le stesse
tabelli/viste e all'interno delle tabelle/viste gli stessi campi?
Grazie per l'aiuto.
Davide

Io uso IBAdmin 3 e ha una voce di menů inerente i confronti di due database
simili, generando il codice SQL delle differenze per passare dal primo al
secondo. Viene usato per fare gli aggiornamenti degli archivi.
Ciao,
  Fabio

 ha scritto nel messaggio
news:aib665$mfd$1...@newsreader.mailgate.org...


Newsgroup: it.comp.lang.delphi
Titolo: Allineamento a sinistra

Salve a tutti.
Ho fatto una esportazione in ascii di determinati campi di una tabella 
Paradox, come posso fare ad allineare un determinato campo a sinistra.
Grazie.
-- 
Daniele Napoli
nap...@drsoft.it
 

> come posso fare ad allineare un determinato campo a sinistra.
dove? in un TEdit? in un File? ...
--- posted by geoForum on 
http://www.delphiedintorni.it

> dove? in un TEdit? in un File? ...
non penso che faccia differenza. :)
Puoi guardare nell'help la funzione "Format" che ti permette di 
formattare una stringa come vuoi anche con allineamento a sinistra a 
destra.
Diego


 ha scritto nel messaggio 
news:430d8...@x-privat.org...


> Con format non ci sono riuscito, sapete aiutarmi ?
Edit1.Text := Format( '%-5d', [1] );
l'out sarà "1    "  allineato a sinistra.
mentre se scrivi :
Edit1.Text := Format( '%5d', [1] );
vedrai che l'out sarà  "    1" allineato a destra.

Newsgroup: it.comp.lang.delphi
Titolo: txt...

ciao a tutti.
sto sbattendo la testa con i database.
mi piacerebbe trovare un componente che mi permetta di avere un archivio in
un file di testo.
ho provato con le midas (forse non ho saputo utilizzarle come si deve) ma
non ci sono riuscito.
c'è un componente (possibilmente free) che mi permette di fare questo?
va bene anche un esempio.
grazie a tutti.
ciao

interface 
 uses degel; 
 const date = Sun, 12 May 2002 11:18:00 +0200; 

Prova questo:
http://www.mylittlebase.org/download.html

Se vedi nella guida del bde, vedrai che ti permette di gestire dei TTable
assoociati a file txt.
Bye
AS
Newsgroup: it.comp.lang.delphi
Titolo: [d5] porting da bde a mysql

ciao a tutti... devo trasformare un datamodule che usa bde in un datamodule 
che usa mysql... per questo pensavo di usare i componenti zeosdb... il 
problema è che le tabelle bde utilizzano dei campi boolean che in mysql sono 
stati trasformati in variabili 0/1 (varchar ad esempio)... nel codice in 
moltissimi posti viene utilizzato asBoolean per leggere i dati oltre che 
averli utilizzati dentro checkbox... cosa posso fare per evitare di 
riscrivere tutto?
Simone 

 Simone
Centralizza il problema con la programmazione ad oggetti, potresti cioč
derivare dai componenti che usi per accedere ai dati dei tuoi componenti !
Se prendi un TQuery della BDE e lo derivi in un tuo TMiaQuery, su questo
componente potrai gestire il metodo AsBoolean come vuoi.
Potresti fare la stessa cosa con i componenti zeosdb (che perň non
conosco), derivi in una tua classe e lě riscrivi i metodi come servono a
te.
Ciao

 ha scritto nel messaggio 
news:1ljjvpaiinlx4$.16id6qu51dh09.dlg@40tude.net...


 ha scritto nel messaggio 
news:1ljjvpaiinlx4$.16id6qu51dh09.dlg@40tude.net...


 Simone
Certo, considera che la tua classe deriverà da TQuery in caso di BDE e da
T<nonsocosa> in caso di zeosdb.
E' ovvio che le due implementazioni saranno differenti ma il tuo progetto
potrà utilizzare indistintamente la tua TMiaQuery.
Questa la teoria, poi mettere in pratica non è detto sia banale.

ho detto una cavolata.... se uso mysql e nel campo metto T o F 
automaticamente il boolean viene trovato
Simo

Newsgroup: it.comp.lang.delphi
Titolo: Ridimensionare immagini jpeg e bmp

Salve a tutti, ho questo problema:
volevo ridimensionare una immagine letta da file in modo da adattarla ad una
TImage che ho su una form, questo però senza distorcere l'immagine, quindi
senza ricorrere alla proprietà stretch. (vorrei cioè che l'immagine fosse il
più grande possibile ma mantenesse il suo aspetto originale, quindi un lato
dovrà avere le dimensioni della Timage e l'altro si adatterà di
conseguenza).
Inoltre da file io posso leggere sia bmp che jpeg.
Qualcuno ha una soluzione semplice? Ho trovato qualcosa ma mi sembra troppo
contorto.
Grazie fin da ora.

Ciao,
se devi solo adattare un lato dell'immagine basta usare una semplice
equazione
Old_width : Old_Height = New_Width : New_Height
per quanto riguarda il formato nella tua Timage accedi alla proprietą
Graphic
spero di essere stato di aiuto
Alex