mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Invio SMS

Ciao a tutti,
  ho un problema abbasta serio (per me) ...
Dalla mia applicazione mandavo sms come promemoria e per questo mi 
appoggiavo al servizio offerto Skebby.
 
Ora e' da un po di mesi che Skebby ha sospeso il servizio via http 
attivando solo il servizio https (prima coesistevano).
 
I loro tecnici avevano sviluppato delle librerie per vari linguaggi, 
compreso Delphi, per il servizio http, niente per https.
 
Considerato che non conosco gli altri linguaggi (CSharp, perlm java 
ecc..) chiedo:
1 - Mi potete consigliare altri gateway che hanno esempi in delphi (no 
Ozaki per la sua complissita' .. .per me)
2 - Nel caso non ci sia alcuna alternativa, chi si offre per la 
traduzione (quindi creare una libreria) per inviare e ricevere sms via 
Skebby (loro hanno passato la mano) per delphi (ovviamente dietro 
compenso concordato).
 
Grazie
 
Ciao
Daniele

E' una chiamata REST e, come tale, non usa NULLA di specifico di Skebby .
Nelle uses vedi solo namespaces standard di .Net/.Net CORE.
In particolare il codice pe rla parte JSON usa la libreria newton che di fatto su .Net è uno standard, esattamente come GSon di Google per il mondo java/android.
 
Prima di mettere mano alla tasca dai un occhio qua:
 
https://docwiki.embarcadero.com/CodeExamples/Sydney/en/REST.RESTDemo_Sample
 
E' un esempio di come chiamare una API Rest da delphi.
 
A.

Ciao,

grazie Alberto per la tua disponibilita'.
Non avendo mai fatto nulla del genere per me e' molto difficile anche 
solo tentare il login.
Ho provato a digitare nel bowser la questa riga
https://api.skebby.it/API/v1.0/REST/login?username=USERNAME&password=PASWORD
 
 
dove USERNAME e PASSWORD sono i miei dati con cui ho accesso.
 
Una volta enter mi dice che quella pagina non esiste.
So di essere molto carente....
 
Nei prossimi giorni mi studio l'esempio cosi' da adattarlo almeno al 
login, poi vediamo come evolvo.
 
Grazie ancora
 
Ciao
Daniele
 

 
https://api.skebby.it/API/v1.0/REST/login?username=USERNAME&password=PASWORD
 
 
Fossi in te non perderei tempo con un qualche browser: modificherei l'esempio al link che ti ho passato.
Comunque, ci sono strumenti per  testare le chiamate REST come questi:
 
https://reqbin.com/
 
https://www.postman.com/
 
https://www.soapui.org/
 
 
A.
 
 
 
 
 
 


Le chiamate dirette tramite browser possono funzionare solo se il servizio che vai a chiamare le accetta in GET
Se invece devono essere passate con il POST o altre modalità devi utilizzare uno strumento alternativo, come ti ha consigliato Alberto.
Io ho utilizzato in passato anche il RestDebugger che viene fornito (con i sorgenti se non ricordo male) nelle ultime versioni di delphi
 
Alessandro
Newsgroup: it.comp.lang.delphi
Titolo: Concatenazione file

Salve a tutti. Qualcuno sa dirmi come fare per concatenare due file?
Grazie

 Grazie
file di testo o binari?
V. 

Sono due file di testo
Valter Buccinà ha scritto:


 Sono due file di testo
var
  L1, L2: TStringList;
...
  L1 := TStringList.Create;
  L2 := TStringList.Create;
  try
    L1.LoadFromFile('first_file.txt');
    L2.LoadFromFile('second_file.txt');
    L1.AddStrings(L2);
    L1.SaveToFile('sum.txt');
  finally
    L1.Free;
    L2.Free;
  end;
...
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

     L2.Free;
Grazie. Mi dà però errore. Il mio problema è che devo copiare due
file molto grossi in uno solo e per fare questo uso un buffer da 900000
caratteri. vorrei poter avere un file risultato in cui mettere prima la
copia del primo file (buffer per buffer) e di seguito la copia del
secondo. il problema è che non so come poter aprire il file risultato
in append. per eseguire la copia nel buffer uso le funzioni BlockRead e
BlockWrite. spero di essere riuscito a spiegarmi, sono nuovo... :)
Grazie


 in append.
Non ti serve e non ti serve il buffer da 900000 caratteri.
var
  ResultFile: TextFile;
  FirstFile: TextFile;
  SecondFile: TextFile;
  S: string;
...
AssignFile(FirstFile, 'file1.txt'); 
AssignFile(SecondFile, 'file2.txt'); 
AssignFile(ResultFile, 'risultato.txt'); 
try
  Rewrite(ResultFile);
  Reset(FirstFile);
  while not Eof(FirstFile) do
  begin
    ReadLn(FirstFile, S);
    WriteLn(ResultFile, S);
  end;
  Reset(SecondFile);
  while not Eof(SecondFile) do
  begin
    ReadLn(SecondFile, S);
    WriteLn(ResultFile, S);
  end;
finally
  CloseFile(ResultFile);
  CloseFile(SecondFile);
  CloseFile(FirstFile);
end;

Newsgroup: it.comp.lang.delphi
Titolo: Visibilità Librerie JEDI

Buonasera a tutti,
ho da poco installato le utilissime librerie JEDI in una cartella del mio
PC. Ora, per ogni mio progetto sono costretto a ricopiarle nella cartella
dei miei progetti per linkarle ai miei programmi. Ho provato anche a
definire in Tool/Environment/Library il percorso delle JEDI ma non riesco ad
ottenere l'effetto voluto.
Vorrei chiedere come posso tenerle nella cartella oroginaria e nei miei
progetti farli puntare a tale cartella ?
Un grazie a tutti voi da Enrico Giudici
ico...@tiscalinet.it

Premi Ctrl+F11 o vai nelle opzioni del progetto, quando hai il progetto
aperto, e inserisci nella pagina directories/.., nella sezione "Search path"
tutti i percorsi in cui sono localizzate le librerie che ti interessano. La
lista č personalizzabile per ogni progetto.
Ciao.
Carlo

 ha scritto nel messaggio
news:VrAs7.4914$aE.16...@news.infostrada.it...



Ma così facendo, per ogni progetto devi copiarti le librerie nal percorso
del progetto. E' normale che così le trovi. L'architettura dell'ide è stata
concepita per centralizzare il sorgente da inserire nei progetti. Che cosa
succederebbe se hai utilizzato in 10 progetti le JCLLibs con il tuo sistema
e ti accorgi che nel sorgente delle stesse c'è un errore? Dovresti
intervenire su tutti  e 10 i progetti e modificare i sorgenti delle JCLLibs.
Dicendo invece ai progetti quale è il percorso in cui andare a trovare le
libs, per correggere il problema basta che lo correggi una volta sola e
ricompili solamante i progetti.
Quello che posso dirti è che ciò che ti ho detto è quello che faccio sempre
nei miei progetti e non solo con le JCLLibs, non ho problemi, tranne quando
sbaglio ad indicare il percorso!!! ;-).
Comunque se posti il punto in cui ti da errore posso vedere di darti una
mano.

 ha scritto nel messaggio
news:RLVs7.4486$MM2.6...@news.infostrada.it...

Ciao Carlo,
Ti do perfettamente ragione e sono pienamente d'accordo con te, anche a me
scoccia tutte le volte ricopiarmi le librerie JEDI nelle directory dei
progetti con evidenti sprechi di spazio.
Comunque l'errore che mi esce è contenuto nella unit JclStrings.Pas alla
line numero 3133, la descrizione è la seguente : Incompatible type :
'Integer' and 'Pointer', ti allego la routine incriminata.
function StringsToMultiSz(var Dest: PChar; const Source: TStrings): PChar;
var
  I, TotalLength: Integer;
  P: PChar;
begin
  Assert(Source <> nil);
  TotalLength := 0;
  for I := 0 to Source.Count - 1 do
    Inc(TotalLength, Length(Source[I]) + SizeOf(AnsiChar));
  Dest := AllocMem(TotalLength + SizeOf(AnsiChar));
  P := Dest;
  for I := 0 to Source.Count - 1 do
  begin
    if Source[I] = '' then
    begin
      FreeMem(Dest);
      Dest := nil;
===>>>>  raise EJclStringError.CreateRes(@RsInvalidEmptyStringItem); <<<<===
    end;
    P := StrECopy(P, PChar(Source[I]));
    Inc(P);
  end;
  Result := Dest;
end;
Ciao e grazie per l'interessamento.
Enrico Giudici
ico...@tiscalinet.it

 ha scritto nel messaggio news:...



Newsgroup: it.comp.lang.delphi
Titolo: Come cambiare nome all'.exe prodotto...

Ciao a tutti, volevo sapere se è possibile cambiare nome al file .exe
prodotto dopo la compilazione. Quando compila mi produce un file ad esempio
"applicazione.exe" che sarà l'eseguibile della mia applicazione posso
cambiare il nome in applicazione1.exe o altro?


wrote:

O rinomini a mano l'eseguibile ;-) oppure cambi il nome al progetto
(file, save project as) 
Ciao.
-- 
Ore 18.30: premo invio.



afaik non è possibile (così come cambiare l'icona a una DLL), però se è un 
problema puoi usare un generatore di file di setup come Inno Setup 
http://www.innosetup.com
 (magari con l'aggiunta dell'interfaccia grafica 
ISTool 
http://www.istool.org
 ) in cui specifichi che il nome 
dell'applicazione è -poniamo- Project1.exe e il file che verrà installato è 
AnythingUWant.exe
Esempio (a livello di script, ma con ISTool è tutto visuale):
Source: Project1.exe; DestDir: {app}; Components: programma; DestName: 
AnythingUWant.exe; Flags: ignoreversion
Oltretutto così hai anche la tua applicazione nella lista in Pannello di 
Controllo | Installazione applicazioni.
(Inno Setup e ISTool sono open source e free)
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)
Newsgroup: it.comp.lang.delphi
Titolo: DLL ISAPI URGENTE.....

Ciao a tutti, io ho creato una DLL ISAPI con intraweb di Delphi 7 ceh poi
deve essere pubblicata sul un hosting win 2003 ma ho saputo che questa non
può funzionare a causa di un bug delle librerie di Delphi in concomitanza
con le restrizioni in--process di sicurezza di IIS 6, c'è qualche patch che
risolve il problema.....Grazie 1000

 c'h qualche patch che risolve il problema.....Grazie 1000
Buona lettura:
http://tinyurl.com/xirw
-- 
I'am what I'am, I do what I can

scusa se ti disturbo ancora.... ma alla fine cosa dice??? E' possibile
oppure devo cambiare hosting?

 oppure devo cambiare hosting?
Dice che per farle funzionare e' necessario che le estensioni vengano
registrate sull'MMC di IIS.
A suo tempo ci provai senza successo. Ti consiglio di cambiare provider.


 A suo tempo ci provai senza successo. Ti consiglio di cambiare provider.
Per Lorenzo: Io, invece, ti consiglio di cambiare tecnologia ;-)
IntraWeb č un vero bagno di sangue... piů lo conosco e piů mi viene voglia
di evitarlo...
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

In che senso è un bagno di sangue?
Limiti?
Problemi di funzionamento?
Ti faccio 'sta domanda xche stavo valutando l'uso di questa tecnologia 
per un progettino a uso interno proprio x vedere come va, ma se tu ci 6 
gia passato accantono e passo ad altro.
A

 gia passato accantono e passo ad altro.
C'è gente che lo conosce molto meglio di me, con cui lavoro, che frequenta
il gruppo e che ti può illuminare meglio.  In ogni caso io lo sto
utilizzando per scelta del cliente dell'azienda con cui collaboro.  Non lo
conosco sufficientemente bene per dilungarmi sui difetti, però ho
l'impressione che sia il tipico esempio di cosa si può fare in modo
pessimo con Delphi.  L'idea che sta alla base è molto buona (perché di
fatto è un RAD nel RAD), è il modo in cui sono state implementate le varie
cose che fa acqua.


 cose che fa acqua.
ma, mi chiedo, a prescindere dalla implementazione, il funzionamento come è?
Cioè, se crei una app iw, la schiaffi sun un server apache e ci fai 
lavorare un po di clients, che fa? si inkazza? incasina i server? 
Alloca troppe risorse di sistema e blocca altre cose che girano sul server?
Trattanosi di un rad, non credo che i problemi siano legati alla 
flessibilità qualora servissero modifiche, giusto?
Grazie della risposta, Andrea.
SYL
A

Newsgroup: it.comp.lang.delphi
Titolo: DataAbstract della RemObject

Se qualcuno ha esperienza con DataAbstract della RemObject, avrei bisogno di una consulenza, mi può contattare direttamente ?

 Se qualcuno ha esperienza con DataAbstract della RemObject, avrei bisogno di una consulenza, mi può contattare direttamente ?
 
carlo.narcisi at 
gmail.com
Newsgroup: it.comp.lang.delphi
Titolo: Formatta testo in stringgrid

Un grazie a Jax per la risposta, domanda su formatta testo,
ho provato ad eliminare il ciclo for, ma cosě facendo non succede
niente, ho provato anche questo:
procedure TForm1.Button1Click(Sender: TObject);
var
C,C1,R: Integer;
begin
  C := StringGrid1.Col;
   C1 := StringGrid1.Row;
   for R := 1 to StringGrid1.RowCount - 1 do
StringGrid1.Cells[C,C1+R]:= UpperCase(StringGrid1.Cells[C,C1+R]);
end;
Vorrei, cliccando su una qualsiasi cella,che il testo diventi maiuscolo solo lě.
Qualche idea?
Grazie ancora.
Ciao!
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it

OK problema risolto, 
ecco qui la soluzione.
procedure TForm1.StringGrid1MouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
Column, Row: Integer;
begin
 StringGrid1.MouseToCell(X, Y, Column, Row);
 StringGrid1.Cells[Column, Row]:= UpperCase(StringGrid1.Cells[Column,Row]);
end;
Un grazie a tutti.



Oppure potresti fare così:
EVENTO ondrawcell
var X : byte; Y : Integer;
for X:=1 to StringGrid1.RowCount do
 for Y:=1 to StringGrid1.ColCount do if X=Y then Y:=X;
Y:=X+1;
if (ACol=SG1.Col) and(ARow=SG1.Row) then begin
                                                                  Y:=Y
mod 2; Y:=X-3;
 
SG1.Cells[ACol,ARow]:= UpperCase(SG1.Cells[ACol,ARow]);
 
Y:=0; X:=0; end
Else SG1.Cells[ACol,ARow]:= lowerCase(SG1.Cells[ACol,ARow]);
Y:=1; X:=1;

Y:=3D1; X:=3D1;
Bello anche questo.
Ti ringrazio.


Newsgroup: it.comp.lang.delphi
Titolo: [OT] Società cerca programmatori DELPHI

Buongiorno,
societą di Milano cerca programmatori DELPHI per impiego continuativo.
Requisiti: conoscenza di Delphi, esperienza di programmazione in ambito
aziendale, conoscenza del database Interbase (gradita la conoscenza di
nozioni di Oracle).
Luogo di lavoro: Milano
Chi fosse interessato e volesse maggiori informazioni puņ mandare il proprio
Cv all'indirizzo 
sab...@libero.it
cordiali saluti

"Sabbia" ha scritto nel messaggio

L'ideale sarebbe scrivere degli annunci di offerta di lavoro a norma di 
legge.
Gianluca.
Newsgroup: it.comp.lang.delphi
Titolo: AIUTO! più dei manuali vale l'esperienza

 <Numero>  123456789,123
Il dbf non ha un campo perl'ora, che io ricordi.
Per le date si.
Se vedi nella doc del metodo credo che dovresti trovare 
delle indicazioni specifiche per i Dbf.
Consiglio:
se conosci qualcuno che usa o usava clipper, fatti dare il Dbu.
Era un prg per gestire i file dbf.
Se lo becchi, puoi:
1) crearti la tabella da dbu
2) collegarti ad essa da delphi e leggerne la struttura
3) con le informazioni che trovi puoi costruirti un blocco
di codice che lo faccia come e quando vuoi tu.
Se poi non conosci nessuno che usa clipper, ma hai la paziena
di aspettare domandi, te lo invio io stesso.
saluti e buon lavoro
AS
-- 
Posted from 
ammi.mclink.it
 [195.110.128.1] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Acc...  fosse vero!, però la situazione è più banale, ed offre lo spunto per
delle considerazioni filosofiche sulla FIGURA DELL'INFORMATICO e sullo STATO
DELL'ARTE dell'alfabetizzazione informatica nel nostro Paese e forse oltre.
  Chi opera nel settore dell'informatica e  particolarmente come
amministratore/gestore di DB aziendali ed il suo lavoro inizia e finisce
all'interno dell' Azienda, può permettersi di eseguire test comparati sui
risultati ottenuti dai vari /Linguaggi e conseguente messa in moto degli
analisti per l'ER Solo LUI non prenderà in considerazione qui formati  di DB
(e tutto il metodo he è contenuto in essi).
  I formati MDB o DBF sono così popolari, che molti li considerano (a
ragione) gli unici universalmente conosciuti, a tal punto che grandi aziende
che operano in più continenti, nel ommissionare dei lavori a professionisti
dell'informatica applicata, conoscono i formati incriminati per trasferire i
dati.
  Per cui credo che la tua reprimenda possa e debba essere presa come
un'avvertimento (se mai ce ne fosse bisogno) che i formati DBF MDB non sono
professionalmente validi; però uoi lavorare, anche i formati DBF E MDB vanno
benissimo. Al massimo mi impegno a consigliare a quell'azienda di cambiare
filasofia sulla propria rete Informatica distribuita. Spendere di più per
avere personale capace ed aggiornato. Ma chi lo fà????
  In molti hanno una cognizione molto vaga su Internet, e credono che
Internet sia un'entità sovranazionale.
  Per cui ti ringrazio dell'avvertimento ma non posso fare a meno di
continuare a leggere da un file MDB e trovata una data, creare un file DBF
nel quale trasferire i dati.
  Il Problema di aprire il File MDB ed estrarre dei record e copiarli su un
file DBR è quotidiano.
Cioè c'è un file ACCESS che si alimenta quotidianamente di 3.000/ 5.000 e
devo fare in modo di estrarre tutti i giorni questi record copiandoli su un
file DBF.
Questo il problema.
Comunque sono a buon punto . Ho ora due bproblemi.
1) Nell' Edit (che chiede la data d'estrazione) posso solo "clikkare", per
cui la conferma dell'edit avviene con gli eventi "OnClick" e "OnDBClik", e
per la tastiera?, il tasto Invio insomma?
2) Non riesco a far registrare nulla sul file DBF. Lo cre, LOCATE   sul file
MDB scorre il file leggendo i valori, ma ogni tentativo di APPEND fallisce.
TENTATE CONSIGLI, GRAZIE!!
Carlo
Newsgroup: it.comp.lang.delphi
Titolo: Elenco task in WinNT

Come si ottiene? Navigando in Internet ho trovato le procedure per tutti
i SO ma per NT... nisba! :(
Qualcuno ha già affrontato la questione e ha voglia di darmi una mano
per favore?
Grazie 1000
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

cosa hai trovato che non va x nt?
AS

Newsgroup: it.comp.lang.delphi
Titolo: Annullare evento onKeyDown

Ciao a tutti
io ho questo problema:
quando scrivo in un edit, tramite l' onKeyDown voglio impedire che
vengano digitati alcuni caratteri.
Tramite abort non ci riesco perche' comunque il carattere viene
scritto.
Ho provato a settate Key=0 ma niente da fare.
Come posso risolvere?
Grazie a tutti


oK risolto usando onKeyPress
ciao

 vengano digitati alcuni caratteri.
Ciao,
se parli di digitazione di caratteri intuisco che codesti caratteri passino 
anche per wm_char, cioč per OnKeyPress. Ecco, se cosě fosse, utilizza 
OnKeyPress ed eventualmente annulla il carattere digitato impostando la 
variabile KEYChar a #0. Cosě:
Procedure TuoComponente.TuoKeyPress(Sender: TObject; var Key: char);
Begin
If not(key in ['0'..'9', 'A'..'Z', 'a'..'z']) Then Key:= #0;
End;
E' un esempio che fa passare solo caratteri alfanumerici.

 E' un esempio che fa passare solo caratteri alfanumerici.
Ottimo
mille grazie
è proprio così che ho risolto

Newsgroup: it.comp.lang.delphi
Titolo: Dbbox copiarne il contenuto su di un altro..

Salve a tutti, ho un database semplice con clientdataset, datasource ecc.. 
su due form ho inserito un dbbox (uno su ognuno), collegandoli allo stesso 
datasource (tramite il listsource) che si trova su di un'altro form, fin qui 
tutto bene, ma quando io mi posiziono sul dbbox di uno dei due form,  e 
visualizzo i dati di un determinato campo, (nel mio caso cognome), vorrei 
che anche il dbbox che si trova sull'altro form cambiasse di stato 
visualizzando lo stesso campo del dbbox precedente, ma questo non accade, in 
pratica quando mi sposto tra i due form, il testo del dbbox rimane su quello 
precedentemente visualizzato.. Come posso fare in modo tale che i 2 Dbbox si 
"muovano all'unisono?"
Ringrazio in anticipo quanti mi aiuteranno
Ps. Ho provato anche con il frame, pensando che riferendosi allo stesso 
componente del frame si copiassero a vicenda, ma non č cosě.. 

 tutto bene, 
in verita no.
gli oggetti di accesso ai dati, salvo ovvie eccezioni dettate dal buon 
senso, non dovrebbero MAI stare sui form.
Quindi, inizia da subito a creare un data module e mettervi dentro tali 
componenti.
Poi, non conosco un componente che si chiama dbbox... Dove sta?
Poi, è ovvio che non lo fa.
le property legate al datasource cambiano solo sul primo, non sul secondo.
Ergo, devi forzare a mano l'operazione sulla seconda ogni volta che la 
esegui sulla prima.
Ti suggerisco di esporre una callback sul secondo form che viene passata 
al primo form in modo che possa essere chiamata ad ogni variazione della 
  dbbox(??) presente sul primo form.
A.

 dbbox(??) presente sul primo form.
Ok, provo a fare come hai detto, grazie ancora!
Newsgroup: it.comp.lang.delphi
Titolo: BLOB ERRORE

moltissime volte mi viene segnalato l'erore BLOB has modified
e il file di database risulta corrotto.
non so piu cosa fare
Il file  é una tabella paradox, contenente campi blob ed indici
grazie

facendo COSA?
In locale o in rete?
A

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

Ciao a tutti
    utilizzo nella mia applicazione un TtreeView ed ho necessità di ordinare
i nodi cliccando sull head della colonna, ma in questo modo mi ordina solo i
nodi del primo livello e non quelli del 3 come avrei bisogno io. Qualcuno ha
idea di come possa fare per ordinare quello che mi serve e non altro?
Grazie
ALE

 ordinare i nodi cliccando sull head della colonna, ma in questo modo
Ma sei sicuro che sia proprio un TTreeView? Che io sappia non puoi mettere colonne in un
TreeView, semmai in un ListView...
--
Jax

Alessandro

Anch'io non sono a conoscenza del fatto che un TreeVieew abbia le
colonne, cmq se vuoi implementare un ordinamento custom devi scrivere
una funzione di ordinamento (non un metodo) e poi chiamare il metodo
CustomSort del TreeView passando l'indirizzo della funzione (che viene
poi chiamata da parte del controllo per tutti gli item che ne hanno
bisogno).
Se si tratta di un ListView (colonna) e' lo stesso: metti da qualche
parte l'info su quale sia la colonna su cui hai cliccato
// dall'help, modificato: funzione di ordinamento
function CustomSortProc(Item1, Item2: TListItem;
    ParamSort: integer): integer; stdcall;
begin
  Result := -CompareText(Item1.SubItems[Col2BeSorted-1],
    Item2.SubItems[Col2BeSorted-1]);
end;
// chiamata della funzione (internamente credo usi QuickSort)
ListView1.CustomSort(@CustomSortProc, 0);
Saluti
Paolo Arosio

Newsgroup: it.comp.lang.delphi
Titolo: COme gestire la Porta COM?

Salve a tutti!
Come da oggetto..
    dove trovo qualche componente adatto allo scopo?
Grazie a tutti CIao!

 wrote in message
8iodhp$c7m$1...@lacerta.tiscalinet.it...


Newsgroup: it.comp.lang.delphi
Titolo: DB, collegare due tabelle

Sto usando i compenenti Zeos per accedere ad un DB MySql e i Data Controls
di D7.
Ho un problema che non riesco a risolvere...
Ho due tabelle, dalla prima vorrei scegliere una chiave tramite una combobox
e utilizzarla per estrarre solo i relativi record sulla seconda tabella e
mostrarli in una lista:
Ad esempio:
Tabella 1:
ID_Sport  Nome
1           Calcio
2           Formula1
Tabella 2:
ID    ID_Sport    Nome
1     1            Del Piero
2     1            Vialli
3     2            Fisichella
4     2            Trulli
Io vorrei che nella combobox mi mostri Calcio, Formula1 etc... e in una
lista separata i relativi nomi  presi dalla tabella2 però non riesco a
capire come fare...
Qualche idea?

 mostrarli in una lista:
Ciao,
guarda negli esempi dei componenti Zeos: MasterDetail č ciň di cui hai
bisogno.
Ciao
Micky
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 bisogno.
Nella versione che avevo io nn c'erano, ho dovuto riscaricare gli esempi,
ora gli do un'occhiata.
Grazie :)
Newsgroup: it.comp.lang.delphi
Titolo: Eccezioni con DB

Salve!
Ho un programma che crea una tabella SQL, e vorrei mettere un eccezione, 
così nel caso in cui la tabella esista già non me la crea.
Ho studiato qui: 
http://programmazione.html.it/delphi/delphi_25.htm
, ma non 
ho capito in pratica come fare per la mia applicazione.
Qualcuno mi può aiutare?
Grazie! 



1. Provi a fare una select sulla tabella da creare e se fallisce vuol dire 
   che la tabella non esiste:
  try
    Database1.Execute('Select * from TABELLA');
  except
    MessageDlg('La tabella non esiste', mtInformation, [mbOk], 0);;
  end;
2. Usi il metodo GetTableNames dei discendenti di TDatabase:
    procedure TForm1.Button1Click(Sender: TObject);
    var mylist: TStringList;
      idx: Integer;
    begin
      try
        mylist := TStringList.Create;
        Database1.GetTableNames(mylist, False);
        if not mylist.Find('TABELLA', idx) then
          ShowMessage('Non esiste');
      finally
        FreeAndNil(mylist);
      end;
    end;
Saluti
	Marco Bortolani
	info @ 
marcobortolani.it

  end;
Ti ringrazio moltissimo per l'aiuto, ma si può fare una specie di
if <db.nometabella> exists
    MessageDlg('La tabella è gia stata creata', mtInformation, [mbOk], 0);;
Grazie ancora! 

 ma si può fare una specie di if <db.nometabella> exists
Senza udare i metodi che ti ho indicato, sui db avanzati (es. Interbase o
Firebird) dovrebbe esserci il modo di interrogare lo schema delle tabelle
utilizzando SQL, ma non l'ho mai approfondito poichè di solito sviluppo in
modo indipendente dalla piattaforma sottostante, quindi preferisco non
ammanettare troppo il software con il db. 
Magari controlla sui manuali.
Saluti 
	Marco Bortolani
	info @ 
marcobortolani.it
P.S.
Auguri di Buone Feste a tutti :-)))

 MessageDlg('La tabella è gia stata creata', mtInformation, [mbOk], 0);;
 
perche' per motivi di sicurezza interebase non 'possiede un alias fisico'
del tipo
...
C:\mioDatabase\miaTabella\ecc .
...
Ciao
Mario- (
mari...@inwind.it
)
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/
Newsgroup: it.comp.lang.delphi
Titolo: Simulare click del mouse su un punto dello schermo

Conoscete un metodo per simulare quello che ho scritto in oggetto?
Cerco una procedura del genere:
MouseClick(x,y);

 MouseClick(x,y);
SetCursorPos(x,y);
Mouse_Event(....);
e hai ricostruito la tua funzione!
--
- Carlo -
cbertu81(at)libero(dot)it

 Mouse_Event(....);

 MouseClick(x,y);
procedure MouseClick(X, Y: DWORD);
  procedure MouseAction(X, Y: DWORD; Flags: DWORD);
  var
    MouseInput: TInput;
  begin
    MouseInput.Itype := INPUT_MOUSE;
    MouseInput.mi.dx := (X * 65536) div Screen.Width;
    MouseInput.mi.dy := (Y * 65536) div Screen.Height;
    MouseInput.mi.mouseData := 0;
    MouseInput.mi.dwFlags := Flags;
    SendInput(1, MouseInput, SizeOf(MouseInput));
  end;
begin
  MouseAction(X, Y, MOUSEEVENTF_ABSOLUTE +
                    MOUSEEVENTF_MOVE);
  MouseAction(X, Y, MOUSEEVENTF_ABSOLUTE +
                    MOUSEEVENTF_LEFTDOWN);
  MouseAction(X, Y, MOUSEEVENTF_ABSOLUTE +
                    MOUSEEVENTF_LEFTUP);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  // click automatico sul tasto Start
  MouseClick(10, Screen.Height-10);
end;

Funziona, ma dopo il click mi si spegne lo skermo.. com'è possibile?

com'è possibile?
?? non so, sulla mia macchina (W98) funziona correttamente.
-------------------------------
Message Posted by  <dedGateway>
http://www.dedonline.com/forump

 basta? Xkè serve il setcursorpos?
Infatti, non serve.

 ha scritto nel messaggio
news:bfaaa329.02071...@posting.google.com...


>invece non funziona senza.. 
Certo che funziona, basta usare il flag "MOUSEEVENTF_MOVE", come ti ho 
mostrato nell'altro messaggio.  Tieni presente che e' bene utilizzare 
SendInput, al posto dei "morenti" keybd_event e mouse_event.


 Mouse_Event(....);
Ma scusa, cosa c'era di cosi' complicato da andare sul ng della Borland?
Mah, chissa'...
Davide.
-- 
Ascolta il tuo cuore. Esso conosce tutte le cose. (Paulo Coelho)

Chi ha detto che era complicato?? Ho solo suggerito di farci un salto ogni
tanto :)

Newsgroup: it.comp.lang.delphi
Titolo: [d5] [bde] bug bde su idapi32.dll

ciao a tutti, sono poco presente perchè non ho ancora un trovato un server
di news in ufficio che funzioni con 191.it....
oggi ho scoperto che un cliente mentre utilizzava una nostra applicazione,
in fase di query (una classica select * from tab e un insert sql) usciva
edberror con messaggio insufficient disk space.... alla fine ho scoperto che
il bde ha un bug nella idapi32 che si verifica in caso di spazio disponibile
multiplo di 4 giga... ho risolto modificando la idapi32.dll tramite un
editor hex (come trovato su sito borland)...
Simone

Ciao,
E' capitato anche ad un mio cliente, e poi si è risolto tutto in automatico 
il giorno successivo.
Ora mi spiego il perchè !!!
Grazie per la info che mi sarà sicuramente utile in caso di qualche altra 
segnalazione in futuro.
Saresti così bravo da pubblicare il link al sito Borland, mi evito di 
cercarlo. :-)
Ciao
MaoSw 

ciao, in realtà su borland ti danno una dll (oppure un file .pas) da
includere nelle uses per poter far redirigere ida32.dll ad un api diversa da
getfreediskspace, quindi è problematico perchè devi ricompilare tutto... io
ho trovato il modo di "craccare" la idapi32.dll modificando alcuni byte
dentro la dll, in modo da far saltare il controllo dello spazio libero e
finora funziona...
se mi scrivi un email allego i link e così puoi anche postarli qui (ho
ancora problemi in ufficio con server news)
Simo
"MaoSw" <mao...@NOSPAMtin.it> ha scritto nel messaggio
news:8%1ie.904831$b5.39...@news3.tin.it...


 ha scritto nel messaggio 
news:ss7ie.906348$b5.39...@news3.tin.it...


 ha scritto nel messaggio 
news:BaQge.889446$b5.39...@news3.tin.it...


purtroppo non trovo il link esatto che mi ha fatto modificare in via
esadecimale la idapi32.dll... però a chi serve ho già la dll patchata
Simo
"MaoSw" <mar...@NOSPAMtin.it> ha scritto nel messaggio
news:cfDie.911577$b5.40...@news3.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: Applicazione Client Server (fax-email-data base ed altro)

Salve a tutti,
stò ora ora raccogliendo dati e componenti per una applicazione C/S
distribuita che deve funzionare su LAN ed Internet, oltre che mediante un
modem locale.
Cerco dei componenti per:
    Iviare e ricevere fax localmente
    Dialogare con un server di data base (su Accesso o altro) via LAN o
internet
    Connessioni C/S su socket per leggere e scrivere email, inviare email al
server, etc...
    "Sparare" il documento fax sul server e inviarlo da quest'ultimo
annzichè dal client
Ho scaricato ASTA DB C/S, ASYNC Pro e alcune socket (DXSock etc...), gli
sto' dando un okkio. Qualcuno li ha mai
utilizzati questi componenti? Se si, per ASTA, quale è stata
l'implementazione migliore?
Per il data base del client pensavo di utilizzare access. Avete qualche idea
di componenti freeware decenti o altri componenti
anche shareware di buon livello?
Un saluto a chi mi legge.
Pierluigi Pentimalli

anche shareware di buon livello?
Usa Interbase.
MsAccess è un giocattolo mal riuscito....
Saluti
AS
"Se è Microsoft non funziona"

Newsgroup: it.comp.lang.delphi
Titolo: Web application e Font

E' possibile far visualizzare all'utente delle pagine web con un font non
presente sul client stesso?
Dai miei test č risultato che, pur avendo utilizzato OCR A Extended
configurato in un file css, il client col quale ho effettuato l'accesso
visualizza il carattere di default.
Quale sistema va utilizzato in questo caso? E' necessario domandare
all'utente se vuole installare il font definitivamente (come?) oppure si puň
utilizzare solo per la sessione di lavoro?
Se l'utente rifiuta si corre il rischio di vedere le pagine in qualche modo
deformate, giusto?
Grazie
Valter

mi sfugge il legame tra la tua domanda e delphi... :-|
A.

 presente sul client stesso?
Sconsiglio l'uso di caratteri diversi dagli "standard di fatto".
L'unico modo per visualizzarli è scaricarli e installarli; a meno che 
non siano indispensabili, meglio ripiegare su qualcos'altro, magari 
anche più gradevole di quello che hai scelto. ;-)
Sulla tua macchina, se il carattere non funziona, probabilmente non hai 
scritto correttamente il file CSS con Delphi.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 mi sfugge il legame tra la tua domanda e delphi... :-|
Concordo sul fatto che sia un pň...OT
...con l'aiuto di tutto il gruppo (e con domande e risposte inerenti Delphi
Net, una materia totalmente nuova per me) sono riuscito quasi a finire il
porting di un sito che avevo appena scritto con Dreamweaver...questa domanda
mi č...sfuggita  :-)  in funzione di tutto l'aiuto ricevuto.
Ciao
Valter

 scritto correttamente il file CSS con Delphi.
no, mi sono spiegato male...accedendo con un client dove il carattere è
installato lo visualizzo correttamente, con un'altro che manca del font
(ovviamente) no...
la mia curiosità era come proporre all'utente di installare il font al primo
accesso al sito (vedrò un pò in rete)  ma a parte l'OT vedo se posso
sostituirlo con uno standard.
Grazie
Ciao
Valter
Newsgroup: it.comp.lang.delphi
Titolo: DBAccess in rete

Ciao,
ho scritto una applicazione che sfrutta ADO e  un db access.
Funziona bene in modo standalone, ma adesso vorrei provare a farla diventare
una applicazione che possa girare su di una rete.
Il problema e' che sono completamente a digiuno di tale programmazione.
Avreste qualche consiglio da darmi? Es. Se un utente apre un record, dalle
altre
postazioni deve essere impossibile aprirlo? E cosi via....
Ciao!
D6
Access2000
WinXP

postazioni deve essere impossibile aprirlo? E cosi via....
Documentati sul locking ad opera del Jet 4.0.
Se non l'hai gia' fatto, ti consiglio di scaricare e utilizzare TBetterAdoDataset (
http://web.orbitel.bg/vassil/
)
in quanto ti permette di gestire diverse proprieta' dinamiche del motore Jet.
Cerca altre infos nel ng borland.public.delphi.database.ado.
Documentazione:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ado270/htm/mdrefjetprovspec.asp
http://delphi.about.com
 cerca per "ado lock", "jet access", ecc...
Ciao,
Morde

 Documentati sul locking ad opera del Jet 4.0.
[CUT]

Preparati ad una scarsa affidabilita' del sistema, a corruzione degli
indici, riparazioni e/o restore frequenti, ecc.
Access e' una piattaforma db tutt'altro altamente sconsigliabile per l'uso
in rete.
Ciao, Sandro

e in locale con un solo utente come va?
E in ambito multithreading?
Io 'sta roba di zio billy non la uso di solito...
A.

lo so, access fa schifo,
ma mi hanno chiesto di costruire una applicazione basata su file access...
che devo fare?
Ps. Quale DB consigliate? Pensavo ad un MySQL....
"Alberto Salvati" <x@x.x from office> ha scritto nel messaggio
news:asnlns$26uf$1...@newsreader1.mclink.it...


Io 'sta roba di zio billy non la uso di solito...
Beato te che puoi scegliere, io devo attenermi alle scelte dei commerciali....
morde.

Ps. Quale DB consigliate? Pensavo ad un MySQL....
Dovresti anche parlare di quello che dovrebbe fare il tuo programma, quanto carico portera'
sul db, ecc...
ciao
mOrde

 Access "fa schifo" se lo usi per fare cose a cui non e' destinato
[CUT]
Tipo?

Tipo?
Quello di cui parlavano gli altri amici nelle risposte, cioe' uso intensivo in rete e simili....
Se vuoi maggiori delucidazioni chiedi ai colleghi di it.comp.appl.access, oppure cerca al suo interno
con google riguardo le prestazioni in rete.
Per applicativi monoutenza garantisco che non da' alcun problema, ne' di performance ne' di corruzione
indici, ecc...Un mio collega libero professionista ha sviluppato un'applicazione con access per un suo cliente e
dopo svariati mesi il db ha raggiunto diversi giga (si, giga) come dimensione ma non ha mai sollevato
problemi di degrado prestazionale ne' di corruzione tabell/indici/eccc.
Ovviamente e' tutto relativo alla portata di quello che devi fare.
Ecco perche' ti consigliavo di postare le direttive di funzionamento del tuo progetto.
Morde
Newsgroup: it.comp.lang.delphi
Titolo: La data che inserisco in un DBDateEdit non viene memorizzata

Ciao, ho questo problema: 
ho un componente DBDateEdit e ho messo la proprietà (che non ricordo il
nome) in modo che venga viasualizzata automaticamente la data corrente.
Quando apro la form vedo il campo data con la data corrente e gli altri
campi vuoti (ovviamente); dopo che ho inserito i dati nei campi faccio il
Post al DataSet e chiudo la form. Quando apro la form con una DBGrid che
contiene la lista di tutti i record che avevo inserito con la form
precedente, vedo il campo Data vuoto e tutti gli altri correttamente
scritti. Se invece scrivo una data io manualmente oppure scegliendola dal
calendario a tendina del componente, allora viene memorizzata
correttamente. Perchè se io la vedo non viene memorizzata?? Forse la vedo
ma non è presente come valore utilizzabile?? Come potrei fare?
---------------------------------------------------------------------------
Messaggio inviato attraverso 
http://www.trucchiperpc.it
 - sezione newsgroup





Newsgroup: it.comp.lang.delphi
Titolo: File di testo

Scusate la domanda da novizio, come si puo' conoscere il totale delle 
righe di un file di testo ?
Grazie per gli aiuti: Shadow

 righe di un file di testo ?
Contandole.
function GetLineCount(const AFileName: string): Integer;
begin
  with TStringList.Create do
    try
      LoadFromFile(AFileName);
      Result := Count;
    finally
      Free;
    end;
end;
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

- Primo metodo (moolto semplice) -
Function FileLength(Const FileName : String) : Integer;
Var
   T : TStringList;
Begin
   T := TStringList.Create;
   T.LoadFromFile(FileName);
   Result := T.Count;
End;
- Secondo metodo (come si usava con il turbo bascal) -
Function FileLength(Const FileName : String) : Integer;
Var
   F : TextFile;
   S : String;
   I : Integer;
Begin
   AssignFile(F, FileName);
   Reset(F);
   I := 0;
   While (Not Eof(F)) Do
   Begin
     ReadLn(F, S);
     Inc(I);
   End;
   CloseFile(F);
   Result := I;
End;
Ciao,
David

 End;
..e la Free della string list ?


 righe di un file di testo ?
Function IntContaRigheFileTXT ( strPath: string): integer;
var
    StringList: TStringList;
 begin
    try
      StringList := TStringList.Create;
      StringList.LoadFromFile(strPath);
      Result := Stringlist.Lines.Count;
    finally
     StringList.Free;
    end;
 end;
Scritta di getto, non provata!
Ciao
ACSH


Ok Ok me la sono scordata colpa della fretta

       StringList := TStringList.Create;
Di norma, il Create() è fuori (prima) del try.  Questo codice genera un
warning di variabile non inizializzata (perché dal finally si passa
sempre).

Newsgroup: it.comp.lang.delphi
Titolo: Poco pratico

Salve veterani di delphi.
Io sono ancora ai primi passi e
gradirei un aiutino:
E' possibile creare una Form con
gli  angoli smussati?
Voglio dire + o - come il componente
TShape che ha la proprietą shape=RoundRect?
Grazie Infinite

Si, è una cosa un pò complessa ma il principio è questo :
usare le Regions di Windows;
sono aree dello schermo (della memoria) utilizzate dalla GUI. Le API per
gestirle sono ben documentate su Delphi (ad
esempio, per il tuo caso BITBLT).
--
`·.¸¸.·´¯`William´¯`·.¸¸.·´

 ha scritto nel messaggio
news:shec8.18834$eD3.7...@twister1.libero.it...


 gli  angoli smussati?
guarda qui...e dacci qualche aggiustatina in base alle tue esigenze
però non è farina del mio sacco.
procedure TForm1.FormCreate(Sender: TObject); 
var
  rgn: HRGN;
begin
  Form1.Borderstyle := bsNone;
  rgn := CreateRoundRectRgn(0,// x-coordinate of the region's upper-left
corner
    0,            // y-coordinate of the region's upper-left corner
    ClientWidth,  // x-coordinate of the region's lower-right corner
    ClientHeight, // y-coordinate of the region's lower-right corner
    40,           // height of ellipse for rounded corners
    40);          // width of ellipse for rounded corners
  SetWindowRgn(Handle, rgn, True);
end;
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.delphi
Titolo: Volete diventare milionari?

http://www.delphifeeds.com/go/f/58770
:-D
-- 
Morde

 
http://www.delphifeeds.com/go/f/58770
In quale mondo sapere che assegnare a nil un evento mi renderï¿œ 
milionario? :)
-- 
Jax

 In quale mondo sapere che assegnare a nil un evento mi renderï¿œ milionario? :)
Io ho fatto solo due errori.. ma ce l'ho fatta lo stesso :)
-- 
Morde

Morde ha scritto:

Ma sei sicuro di aver postato il link giusto?
-- 
Jax

 Ma sei sicuro di aver postato il link giusto?
Ecco ho fatto la cagata..
 questo e' il link:
http://delphi.about.com/od/humorandfun/a/delphi_guru.htm
sorry
-- 
Morde

 
http://delphi.about.com/od/humorandfun/a/delphi_guru.htm
Milionario senza manco un errore! :)
-- 
Jax

 ha scritto nel messaggio 
news:4a6f...@news.x-privat.org...

Grazie del link
molto carino !
C 

ho fatto 2 errori...e ho scoperto 2 cose che non sapevo...bello.
A.

Morde ha scritto:

Un solo errore, il piï¿œ stupido :) LOL
Antonio

Newsgroup: it.comp.lang.delphi
Titolo: Libri per inziare

Ciao,tenendo conto che non ho nessuna conoscenza in fatto di
programmazione,vorrei qualche consiglio su che libri comprare per iniziare a
"programmare" con Delphi.
                                                 Grazie

 ha scritto nel messaggio
news:97tj3c$jbm$1...@pegasus.tiscalinet.it...


 wrote in message
97tj3c$jbm$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.delphi
Titolo: AIUTO : multiporta seriale

Ciao a tutti, chiedo fin d'ora scusa qualora l'argomento fosse già stato
trattato.
Ho un sistema multiporta seriale, con un dispositivo che gestisce 6 seriali.
Devo inviare un semplicissimo segnale ON ad un circuito esterno. Ogni
seriale ha collegato uno di questi dispositivi. Lavorando sul mio portatile
non ho alcun problema (ma ha 1 sola porta). Quando metto il tutto su questo
pc multiporta succede una cosa strana: il segnale non viene riconosciuto o
viene riconosciuto "a caso", senza una logica. Premetto : uso un componente
seriale che ha programmato un mio amico e quindi non posso garantire la
correttezza del codice.
Qualcuno ha un'idea? Vi dico anche che il dispositivo multiporta non ha
alcuna documentazione.
Qualcuno sa dirvi eventualmente quali API devo usare per programmare io
direttamente la gestione della porta (inizializzazione, lettura,
scrittura).Un piccolo esempio non sarebbe sgradito.
So di chiedere molto, ma sono veramente nei guai...
Grazie a tutti. Marco.

Allora, io tempo addietro ho trovato un componente free per gestire fino a
12 seriali, lo avevo trovato su Delphy Super page o su Torry adesso non
ricordo, se non riuscissi a trovarlo dimmelo che vedo di cercarlo fuori e
spedirtelo.
Anzi adesso lo cerco e ti dico per lo meno il nome : )
mi trovi su icq: 2970233
e-mail 
ala...@freemail.it
spero di esserti stato utile : )))

Allora il componente si chiama ComDrv32 e riesce a gestire fino a 16
seriali.
ciauz.

 ciauz.
sei un grande....mi ha salvato. GRAZIE MILLE e a buon rendere.
Marco

Newsgroup: it.comp.lang.delphi
Titolo: Unione di più Immagini





Salve raga sto cercado di fare un progettino free 
il quale crei un bmp che contenga altre immagini selezionate in 
precedenza


quindi ho pensato di farlo così :


a seconda di cio che apre l'operatore si creano una 
serie di TImage
 
a video e poi Per 
il salvataggio io mi prendo l'immagine che vedo sul video .... e qui viene 
il problema ... 


se voglio creare un immagine più grande di quella 
che vedo nel video come posso fare 


 


Qualsiasi idea è BEN ACCETTA! Grazie 




Qualsiasi idea č BEN ACCETTA! Grazie
Non scrivere in formato HTML...
Ciao
Matteo

)


Ok ... Pardon !!

Newsgroup: it.comp.lang.delphi
Titolo: Delphi e database

Salve.
Volevo un' informazione.
In Visual Basic .Net un database non può essere creato dal linguaggio, ma ci
si deve collegare ad uno esterno, tipo Access.
Lo stesso vale per Delphi?
Ho la versione 7 di Delphi, è buona per cominciare o devo aggiornarmi?
On line, per avere un primo incontro con il linguaggio, c'e' qualche
risorsa?
Ciao e grazie.

 risorsa?
Puoi dare un'occhiata a questo corso, anche se è un po' datato:
http://programmazione.html.it/delphi/index.html
oppure leggere "Essential Pascal" di Marco Cantù:
http://www.marcocantu.com/epascal/default.htm
Anche la Guida in linea di Delphi contiene "percorsi di apprendimento" 
interessanti.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 personalizzato secondo le tue esigenze.
Visual Baic .Net, senza Access o altrdb, non può sviluppare applicazioni db.
Un file database deve già esistere, e quindi "importato".
Anche per Delphi è cosi?
Essential Pascal esiste solo in lingua inglese?
Mi consigliate un buon testo per cominciare a programmare (in lingua
italiana)?
Ciao


 italiana)?
Cerca nei vecchi post con Google, ne abbiamo già parlato a lungo e più 
volte.


Newsgroup: it.comp.lang.delphi
Titolo: Calcolo sfrido

devo fare una procedura che mi calcoli la distribuzione del materiale su una
barra, in modo da ridurre al minimo lo sfrido.
Avevo pensato ad un modo, ma pur essendo "decente", non č sicuramente il
migliore.
Supponendo di avere due 2 barre di lunghezza X. n. di tagli n lunghi L.
Ho fatto una procedura che mi sviluppi fisicamente i tagli.
Es. n.5 pezzi lunghi 200 e n 7 pezzi lunghi 150
3 barre lunghe 500
Creo una lista contenente 12 elementi 5 di l. 200 e 7 lunghi 150.
Poi con un altra procedura controllo partendo dall'elemento piů lungo (200)
se sta nella barra piů corta fino a trovarne una in cui ci stia. Dopo
passerei al secondo elemento piů lungo (200) fino arrivare in fondo.
Mi sono ritrovato perň che cosě facendo ho (altro es.) :
Barra 1 lunga 6000     taglio 1 L=333
                                  taglio 2 L=256
Sfrido 5411
Barra 2 lunga 2300     taglio 1 L=1702
                                  taglio 2 L=408
Sfrido 188
Ora se io invece di fare il taglio 2 nella seconda barra l'avessi fatta
nella prima  e i due tagli nella prima nella seconda, mi sarei trovato :
Barra 1 lunga 6000     taglio 1 L=408
Sfrido 5592
Barra 2 lunga 2300     taglio 1 L=1702
                                  taglio 2 L=333
                                  taglio 3 L=256
Sfrido 9
Qualcuno ha un idea a proposito ?

Stefano,
se ne era parlato a lungo sul vecchio ng di marco cantů. Forse anche sul
nuovo. Purtroppo io ho perso tutti i msg. Prova su deja, altrimenti sul
nuovo ng di Cantů; forse gli interessati di allora sono lě in giro.
hth
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: Query

Ho una query che mi calcola la somma di alcuni campi, come faccio ad
accedere al valore del campo calcolato?
Se assegno il tutto ad una dbgrid vedo il risultato es. :
Nome          Sum of Importo
Stefano            1000
Marco                500
Come faccio?
--
Stefano Tampieri



Se ho capito bene hai
select Nome, sum(importo) 
from....
basta che fai 
select nome, sum(importo) as totale  .........
e poi FiledByName('Totale').value.
Ciao,
Massimo.
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"

 ha scritto nel messaggio
news:7uo5O54NGeNKdW...@4ax.com...

Newsgroup: it.comp.lang.delphi
Titolo: leggere un file .ini

Devo leggere e modificare un file uguale ad un file .ini
Esso è composto da una variabile php, un uguale, un valore, un punto e
virgola e il ritorno a capo:
es:
$pippo="test";
$pluto="test2";
$minni="test3";
Come faccio a leggere i nomi delle variabili e il suo rispettivo valore?
avete qualche suggerimento?
Il file che li contiene si chiama variabili.ini ed è un normalissimo file
ascii.
Ciao e grazie
Gianni

 ha scritto nel messaggio
news:9f28cm$j8c$1...@lacerta.tiscalinet.it...


La TRegIniFile non va bene, perché la TRegIniFile serve a "simulare" un file
.ini nel Registry.
La classe da usare è TIniFile.
Andrea

 ha scritto nel messaggio
news:7S2R6.12042$Uo3.4...@news6.giganews.com...


complicati...
potresti considerare anche di usare un TIniFile..
[non testato]
TuoINI.ReadString('Sezione', '$NomeVariabile', '');
Ciao,
Alan Solo

Newsgroup: it.comp.lang.delphi
Titolo: Consiglio Libro Delphi 5 per dBase locali e C/S

Salve al NG,
    avevo intenzione di prendere un buon testo di programmazione dBase per
delphi (uso anche BCB
ma ho sempre studiato su testi di Delphi, a mio avviso migliori e facilmente
riconducibili all'IDE
C++ della Borland.... ) e vorrei un consiglio da voi. Vorrei un testo che
introducesse a gestione dei
dBase locali per passare all'utilizzo di architetture C/S, Interbase e
connessione a dBase SQL, tipo
MS SQL 7 e Oracle.
Non ho problemi per i testi inglesi.
Grazie in anticipo, INFERNO.

