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

Da un applicativo Delphi dovrei mandare in esecuzione una pag. .asp presente 
in un sito.
Come faccio, non vorrei usare IE.
Giorgio 

 Come faccio, non vorrei usare IE.
Se usi "Indy Components", invia la richiesta al server tramite il 
componente *TIdHttp*.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
     Non hai la possibilità di scaricare Turbo Delphi Explorer?
     Te lo spedisco io!! [
http://www.marco.breveglieri.name/?p=48
]

   Marco.
E' un lavoro fatto in D3 e che vorrei mantenere tale.
In seguito al tuo suggerimento ho trovato un componente http tra gli ICS di 
piette che dovrebbe essere l'analogo di Indy, grazie giorgio 

 piette che dovrebbe essere l'analogo di Indy, grazie giorgio 
Sì, il riferimento a "Indy Components" era del tutto indicativo: se hai 
un qualsiasi componente o una libreria in grado di inviare una generica 
richiesta HTTP, sei a posto.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
     Non hai la possibilità di scaricare Turbo Delphi Explorer?
     Te lo spedisco io!! [
http://blog.marco.breveglieri.name/?p=48
]

Newsgroup: it.comp.lang.delphi
Titolo: QReport ZTable e Expression a pie di pagina

Ciao a tutti, piccolo chiarimento !
Stò usando D7 Zeos 6.1.5 MySql 4.1.3 e ho creato un report master detail 
con tutti i filtri preimpostati. Fin qui tutto bene il report mi si 
visualizza correttamente.
Il problema stà nel fare un calcolo (banale somma) dei campi prezzo del 
subdetail.
Ho provato con una banda groupfooter dove ho inserito un campo 
QRExpression ma purtroppo quando vado per selezionare il dataset e 
scegliere il campo di cui fare la somma non compare nulla. Ho provato a 
scriverlo a mano ma il risultato è uno 0.
Insomma non so che pesci pigliare.
Ho provato a legare un dataset alle ztable ma niente da fare il qreport 
non le vede nemmeno.
Con il rave poi nemmeno a parlarne casini con il master detail e i campi 
calcolati non si vedono nemmeno a designtime.
Qualcuno a risolto e/o può darmi consigli ?
Omega

Il problema nasce dal QRExpression che diversamente dal QRDBText ed
altri componenti, riconosce solo i campi definiti del Dataset. E'
sufficiente che fai doppio clic sul componente query o tabella e
aggiungi tutti i campi.

 
Niente da fare non riesco a visualizzarli però impostando a mano la 
funzione adesso restituisce un risultato.
Problema:
	vorrei che visualizzasse la somma solo del dettaglio corrente e non la 
somma progressiva di tutti i dettagli mi spiego:
ho:
	nome cognome codice (master)
		prodotto quantita prezzo	(detail)
		prodotto quantita prezzo	(detail)
				  somma (parziale)
	nome cognome codice (master)
		prodotto quantita prezzo	(detail)
		prodotto quantita prezzo	(detail)
				  somma (parziale)
	nome cognome codice (master)
		prodotto quantita prezzo	(detail)
		prodotto quantita prezzo	(detail)
				  somma (parziale)
e cosi via adesso la seconda e la terza somma parziale comprende la 
somma anche dei precedenti come si può evitare ?
dipende forse che la banda in cui si trova il QRExpr è un Group Footer ?
Non ho ben capito come linkare le bande forse....
Omega
Newsgroup: it.comp.lang.delphi
Titolo: formattare una stringa

Ciao, ho delle procedure che mi ritornano un valore formattato così: 
format('%m',[Query1.field.value]), ma siccome a me serve sapere il 
totale di queste operazioni ho pensato di assegnare tutti questi 
risultati a una variabile di tipo Variant in questo modo:
Variabile:=Variabile + format('%m',[Query1.field.value])
Funziona tutto, però il numero che la variabile memorizza è del 
tipo :1234,56 cioè con la virgola e senza il separatore delle migliaia. 
Ho provato a formattarla in vari modi ma mi da errore perchè riconosce 
come virgola il separatore delle migliaia. Dovrei visualizzarla con il 
punto separatore delle migliaia e la virgola come è adesso, come posso 
fare?
Grazie.
Inviato da 
www.mynewsgate.net

while not dataset.eof do
  begin
  stringa := stringa +
formattavaluta(dataset.fieldbyname('xxx').AsQualcosa);
  .....
  Somma := somma + dataset.fieldbyname('xxx').AsQualcosa
  dataset.next
  end;
function FormattaValuta(const AValue: currency): string;
begin
  Result :=  format('%m',[AValue])
end;
non è molto corretto avere una funzione che fa 2 cose diverse:
leggere da un dataset il valore di un campo
formattare il valore e restituirlo
Una funzione o una procedure (o un metodo...) dovrebbero fare una sola cosa,
in modo da essere *riutilizzabili*.
Tra poco scoprirai che la funzione di formattazione ti è utile anche in un
altro contesto non legato ad un dataset e qui hai 2 scelte: duplicarla
(=ridondanza di codice con raddoppio del lavoro di correzione in caso di
bug) oppure modificarla come ti ho detto io.
Bye
A

Grazie del consiglio, ho rimesso un po' a posto le cose e con una 
funzione sola, come dici tu, faccio più cose.
Inviato da 
www.mynewsgate.net
Newsgroup: it.comp.lang.delphi
Titolo: CreateFont

Salve a tutti!
Volevo sapere se qualcuno ha gia' utilizzato la funzione API
CreateFont(). Io la utilizzo per creare un font con un orientamento
verticale, pero' ho un problema, la funzione mi ritorna un errore di
tipo range check error e non capisco perche'.
Ho provato a inibire l'errore con la direttiva {$R-} e il font viene
creato correttamente, pero' utilizzando la funzione nel paint di un
oggetto, a design-time l'oggetto a volte non viene ridisegnato e
scompare (solo dal punto di vista grafico).
Questa e' la chiamata della funzione:
VerticalFont := CreateFont(Font.Height, 0, 900, 0, FW_BOLD, 0, 0, 0, 1,
4, $10, 2, 4, PChar('ARIAL'));
e VerticalFont è dichiarata come tipo cardinal.
Grazie infinite a tutti.
N.B. Al momento di cancellare l'oggetto con la funzione
DeleteObject(VerticalFont), mi da lo stesso errore di range
check...quindi immagino che l'errore sia nel valore ritornato dalla
funzione CreateFont...
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

ma non dici su quale versione di Windows hai riscontrato questo errore.
Hai provato su + versioni a vedere cosa succede?
Bye
AS

 tipo range check error e non capisco perche'.
Personalmente, se devo solo ruotare un font esistente uso
CreateFontIndirect. Se fai un grep sulle cartelle di esempi di Delphi ci
dovrebbe essere un esempio, cmq vedi sotto.
Saluti
Paolo Arosio
// stampa una stringlist (Head) con orientamento verticale
  var i, OffsX, rH, h: integer;
      aFont, PrevFont: HFONT;
      aLogFont: TLogFont;
      aDc: HDC;
      s: TSize;
...
  aDC := Printer.Canvas.Handle;
  GetObject(Printer.Canvas.Font.Handle, SizeOf(aLogFont), @aLogFont);
  aLogFont.lfEscapement   := 90*10;
  aLogFont.lfOrientation  := 0;
  aLogFont.lfOutPrecision := OUT_TT_ONLY_PRECIS;
  aFont := CreateFontIndirect(aLogFont);
  PrevFont := SelectObject(aDC, aFont);  // <<<<<<<<<<<<<<<<<<<<
  try
    // calcola altezza massima della riga degli header (rH)
    rH := 0;
    for i := 0 to Pred(Head.Count) do begin
      GetTextExtentPoint(aDC, PChar(Head[i]), Length(Head[i]), s);
      h := 
s.cx
;
      if h > rH then rH := h;
    end;
    // ed abbassa di conseguenza il punto di inizio stampa
    inc(OffsY, rH);
    for i := 0 to Pred(Head.Count) do begin
      TextOut(aDC, OffsX, OffsY, PChar(Head[i]), Length(Head[i]));
      OffsX := OffsX + fW; // fW e' la larghezza di ciascun header
    end;
   finally
    DeleteObject(SelectObject(aDC, PrevFont));// <<<<<<<<<<<<<<
  end;
Newsgroup: it.comp.lang.delphi
Titolo: Classi & casini : una domanda (forse..) scema....

Ho 3 classi
TMyItem =class(TCollectionItem)
TMyListItem = class(TCollection)
TMyComponent = class(tComponent)
TMyListItem ha come items oggetti di classe TMyItem.
TMyComponent ha una proprieta di classe TMyListItem
Come cacchio si fa ad aggiungere a MyListItem una proprieta del tipo:
property MyComponent : TMyComponent read GetMyComponent write
SetMyComponent?
TMyComponent va per forza di cosa definita dopo le altre 2?
Grazie a chiunque sappia indicarmi qualcosa....
AS
"Se è Microsoft non funziona"

  end;
provo e ti faccio sapere.
TNX


Adesso posso dormire tranquillo...
10000 TNX  :))))


mi pare che devi fare cosi':
Type TMyComponent = class(tComponent);
        TMyItem =class(TCollectionItem)
            <corpo>
        TMyListItem = class(TCollection)
            <corpo>
        TMyComponent = class(tComponent)
            <corpo>
un solo type all'inizio. La prima dichiarazione non ha il corpo..
Se non va mi scuso :)

>
Ho 3 classi
TMyItem =class(TCollectionItem)
TMyListItem = class(TCollection)
TMyComponent = class(tComponent)
TMyListItem ha come items oggetti di classe TMyItem.
TMyComponent ha una proprieta di classe TMyListItem
Come cacchio si fa ad aggiungere a MyListItem una proprieta del tipo:
property MyComponent : TMyComponent read GetMyComponent write
SetMyComponent?
TMyComponent va per forza di cosa definita dopo le altre 2?
<<
Esiste la dichiarazione forward delle classi.
Definisci una delle tre come classe e la specifichi meglio in seguito.
Esempi in classes.pas: TStream, TFiler, TReader....
type
  TClass2BUsedBelow = class;     // forward declaration
  TClassUsingTheAbove = class(TInheritFrom)
    private
       FUsedClass = TClass2BUsedBelow;
      ...
  end;
  TClass2BUsedBelow = class(...)
   ...
  end;
hth
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: Parametri e date

Come mai il codice di cui sotto funziona perfettamente con un database
DBISAM,ma non funziona con un database TurboDB?(Non riesco a usare i
parametri sulle date)
With Query1 do
begin
     query1.DisableControls;
   close;
   SQL.Clear;
    SQL.Add('SELECT * FROM TPrima');
    SQL.Add('WHERE');
    sql.Add('Nascita  between :data1 and :data2');
     ParamByName('data1').Asdate := (DataDal.Date) ;
    ParamByName('data2').AsDate :=(DataAl.Date);
      open;
  query1.EnableControls;
DataDal e DataAl sono due TimePicker.
Funziona solo se scrivo
sql.add('Nascita between "11/12/1957" and "21/03/1978"')
cioe' scrivendo le date tra  le doppie virgolette e solo scrivendole e non a
digitarle in un Edit o un TimePicker
Grazie a chi mi aiuta.

     ParamByName('data2').AsDate :=(DataAl.Date);
Devi assegnare un tipo al parametro, questo l'ho copiato giusto qui da 
un'applicazione dove alla query vengono passati parametri da un timepicker:
[...]
       qLog.ParamByName('DataIni').DataType:=ftDate;
       qLog.ParamByName('DataIni').AsDate:=tPickGetIni;
       qLog.ParamByName('DataFin').DataType:=ftDate;
       qLog.ParamByName('DataFin').AsDate:=tPickfGetFin;
[...]

   query1.EnableControls;
Non so se faccio bene, ma solitamente io gestisco le date come numeri 
interi (un semplice trunc della variabile TDateTime) in modo da non aver 
problemi con i vari formati (qui gg-mm-aa, da altri mm-gg-aa)
Quando poi visualizzo i dati nelle grid o in qualche altro controllo, li 
riformatto in date normali
In questo modo diventerebbe:
      SQL.Add('SELECT * FROM TPrima');
      SQL.Add('WHERE (Nascita>=:data1) and (Nascita<=:data2)');
      ParamByName('data1').AsInteger :=trunc(DataDal.Date) ;
      ParamByName('data2').AsInteger :=trunc(DataAl.Date);
Ciao,
Ukkiosan

Newsgroup: it.comp.lang.delphi
Titolo: InstallShield - Eseguire un EXE alla fine dell'installazione

Ciao a tutto il NG.
Ho un piccolo problema!
Qualcuno sa dirmi come "dire" a InstallShield per Delpi 4 ver. 2.2 di
eseguire un exe alla fine dell'installazione?
E come creare un file di Autorun?
Grazie a tutti,
Ciao!
-- 
Posted from 
ro...@ems.flashnet.it
 [194.247.160.44] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto
nel messaggio news:000001c0a873$0edddba0$c80a0a0a@ALESSANDRO...


 wrote in message
P11q6.10320$E57.4...@news4.aus1.giganews.com...

Newsgroup: it.comp.lang.delphi
Titolo: Button

Ciao a tutti,
sto cercando di creare un componente Button che abbia tutte le
caratteristiche dei bottoni
di Delphi (TButton, TBitBTN) ma che mi permetta di cambiare il colore di
sfondo, il colore dei bordi, senza perdere la possibilità di gestire
l'evento OnFocus (quindi abbia anche la proprietà TabStop)
Non VOGLIO scaricare niente di già fatto.
Sò come si crea un componente, ma come devo fare per colorarlo ?
Grazie in anticipo a tutti colore che vogliano darmi una mano.
RLB
--------------------------------
Inviato via 
http://usenet.libero.it

sfondo, il colore dei bordi
TButton e TBitBtn non hanno modo di cambiare il proprio colore, devi
ereditare direttamente da TWinControl e gestire tu il disegno del
componente.
-- 
Andrea Laforgia
#exclude <windows.h>

 e gestire tu il disegno del componente.
Devo usare Canvas.Brush???
Se sì, ......come?
Grazie Mille


Se sì, ......come?
Parti da TCustomControl, è fatto apposta. 
Consulta l'help di Delphi, c'è tutto quello che serve.


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

Ciao a tutti. Come faccio a inserire in una ListBox1 dei valori tramite
un bottone? ho provato con ListBox1.Items := '...'  all'interno
dell'azione del bottone ma non funziona perchè richiede un tipo
Tstring e non string, ma non so come poterlo inserire

Spero che gli addetti all'help di Delphi non leggano i tuoi post.
Help -> TListBox -> Methods.
Acqua
----------------------------------
Albertone, ti ho fregato anche questa volta :p 

> Albertone, ti ho fregato anche questa volta :p
..stardo! :-)))

 ha scritto nel messaggio

Roby...ti stanno tirando le orecchie  :-)
*ListBox1.Items.Add*
Se me lo permetti, un suggerimento:
quando usi un componente per te nuovo vai nell'help e dai anche solo 
un'occhiata a tutte le proprietà, metodi ed eventi.
Lo selezioni e premi F1.
Oppure ti scorri tutto il menu che ti compare in automatico nell'editor e te 
ne fai una vista...rapida
al momento giusto qualcosa riaffiora!
Oppure ancora "entra" in Google...è una risorsa infinita, e a volte trovi 
proprio parti di codice già bello che pronto all'uso
Ciao
V.

Valter Buccinà ha scritto:

Ok, grazie :) ps. scusate se posto domande un pò stupide.... ma sono
nuovo nuovo e abbastanza incasinato.... :)
Newsgroup: it.comp.lang.delphi
Titolo: Problema strano con D5 Enterprise e SQL Server

Salve a tutti, ho realizzato un programma con D5 Enterprise, il quale va a
leggere dati da un database SQL Server, ma ogni tanto mi viene dato l'errore
"Invalid Field Type". Ho scoperto che tale errore salta fuori quando la
tabella ha campi di tipo "nvarchar" o "nbinary" oppure "n-qualcos'altro".
Sinceramente non so che tipo di campi siano, e ho scoperto che modificandone
il tipo e trasformandoli in "varchar" normali tutto funziona. Il problema e'
che non posso avere la certezza di non trovare campi "nvarchar" nel database
quando il programma girera', e non posso convertirli tutti uno a uno (sono
1200 tabelle!).
Il driver che uso e' quello nativo del BDE (non devo usare ODBC o ADO).
Qualcuno sa dirmi come risolvere il problema?
Grazie
Daigo
--
And the beast shall come forth surrounded by a roiling
cloud of vengeance. The house of the unbelievers shall
be razed and they shall be scorched to the earth. Their
tags shall blink until the end of days.
From The Book of Mozilla, 12:10

La risposta è semplice: IL BDE NON SUPPORTA I TIPI DI DATO "N-..."
Il tipo nvarchar, nchar,... identificano quei tipi di campi "nazionali"
ovvero : con un solo byte utilizzato per identificare un carattere.
Utilizzando Sql Server dovresti aver sentito parlare del "Character Set".
Per supportare tutti i tipi di caratteri alcuni character set utilizzano due
byte per memorizzare un solo carattere. Questo comporta un doppio spazio
occupato. I campi di tipo "n" sono identificati come nazionali perchè se ne
FREGANO del "Character Set".
Io non ho D5 Enterprise ma penso che la soluzione ideale per sfruttare
appieno Sql Server siano le ADO.
Io utilizzo ODBC (appoggiandomi ovviamente al BDE) e sono abbastanza
soddisfatto anche se, ovviamente, non utilizzo i campi di tipo "n-..."...
ciao








Il problema che ho riscontrato io e' che con SQL Server 7 + ODBC mi capita
che di qualche tabella il programma mi veda solo alcuni campi, mentre invece
ne ignori altri (senza apparente motivo, infatti magari mi vede alcuni
interi e altri no...)
Quindi anche l'ODBC mi da' problemi.
Ho paura che non posso farci niente...
Grazie comunque
Daigo
Newsgroup: it.comp.lang.delphi
Titolo: Programma con componenti ADO (per collegarmi ad ACCESS 2000) blocca ME

Ciao a tutti.
Ho fatto un programmino che gestisce 2 misere tabelle. Per far questo ho 
usato:
- n°1 comp. di tipo TADOConnection. nell'OnCreate del DataModule scrivo
	ADOConnection1.ConnectionString:= 						 
'Provider=Microsoft.Jet.OLEDB.4.0;'+
                 'Data Source=' + ExtractFilePath 
(Application.ExeName) + 		'DB\dbGP.mdb;' + 'Persist Security Info=False'
- n°2 comp. di tipo TADOTable tramite i quali mi collego alle tabelle.
- n°2 comp. di tipo TDataSource collegati ai due oggetti di tipo 		 
TADOTable
- n°1 comp. di tipo TADOQuery che mi serve unicamente per 
eliminare i 			record selezionati dall'utente (lo uso per entrambe le 
tabelle).
Puntualizzo che per inserire, modificare e salvare i record uso 
rispettivamente MiaTabella.Insert, MiaTabella.Edit e MiaTabella.Post 
(credo come tutti).
Ogni volta che apro il programma e compio qualsiasi operazione di 
modifica al database non riesco ad aprire nesss'altro programma o 
cartella (si ha la senzazione che il mouse non clicchi per nulla) 
neanche il programma stesso.
Ho provato anche a fare il debug del programma sul computer incriminato 
ma non da nessun errore (ho provato a far girare il programma anche su 
un altro computer con su ME e non va).
Sperando di non essere stato logorroico nello spiegare il mio problema, 
ringrazio tutti quelli che mi vorranno aiutare.
Ciao,
   mal

   mal
Ciao MassimoB
------------------------------------------
http:\\
www.massimobeschi.it
Newsgroup: it.comp.lang.delphi
Titolo: Array di Button

Ho creato un array dinamico di Button. Con un ciclo for li creo e setto le
loro proprietà.
Volevo assegnare a tutti i Button un unica procedura per l'evento OnClick. A
questo punto la domanda è come faccio a sapere quale Button dell'array ha
generato l'evento?
sabba...@libero.it

Utilizza l'operatore AS
Setti la proprietą TAG dei TButton con un numero Integer diverso tra loro
poi
nell procedura........
procedure AllClickButton(Sender : TObject);
begin
for i := 1 to quanto ci hai l'array do
begin
    if (Sender as TButton)[i].tag = 0 then
  ...........
  else if bla bla bla
end;

 generato l'evento?
Semplice!
Ti faccio un esempio pratico: Supponiamo che tu i bottoni li crei con questa
procedura in seguito al click di un bottone già esistente...
procedure TForm1.CreaClick(Sender: TObject);
Var
  I:Byte;
  A:Array [1..5] Of TButton;
begin
  For I:=1 To 5 Do
  Begin
    A[I]:=TButton.Create(Self);
    A[I].Parent:=Self;
    A[I].Left:=50;
    A[I].Top:=50+I*30;
    A[I].Caption:='Bottone'+IntToStr(I);
    A[I].OnClick:=EventoClick;
  End;
end;
A questo punto trovi 5 bottoni incolonnati tra di loro...
Con questa procedura all'evento onclick che gli hai assegnato durante
l'esecuzione del precedente ciclo (EventoClick) gli scrivi ad esempio:
procedure TForm1.EventoClick(Sender: TObject);
begin
  ShowMessage('Il Bottone È '+(Sender As TButton).Caption);
end;
A questo punto (io l'ho messo in uno showmessage ma puoi ovviamente
modellarlo) ti dirà la caption del bottone che ha generato l'evento o se
preferisci puoi assegnarli il nome o quel che vuoi tu, purchè ti aiuti a
distinguere il nome del bottone.
Tutto funziona ora?
Spero di si sennò riscrivi.
Ciao.
Carlo Camarda
chiamac...@tiscalinet.it
]@#[ Myriam I Love You ]#@[
Newsgroup: it.comp.lang.delphi
Titolo: due connessione DBexpress a dbms diversi...

Delphi studio 2006
devo connettermi tramite DBexpress a due dbms diversi, MySQL e DB2 per 
sincronizzare alcuni dati.
Dopo aver capito che per connettermi a mySql 5.0 devo utilizzare la libreria 
free dbxopenmysql50 perche' delphi di suo non ce la fa, riesco a connettermi 
a entrabi i dbms, in progetti diversi.
Quando li integro insieme delphi al primo Connection.Open da un accesso 
violation. Ho provato sia a linkare dinamicamente le dll di connessione sia 
a ricompilare staticamente, in tutte le combinazioni, ma non riesco.
Qualche idea?
grazie
-- 
maz

> Qualche idea?
Ciao. Ke TSqlConnection sono  contenute nello STESSO datamoudle, per
caso?

 caso?
Non uso datamodule.
Sembra che non si possano carica due dll contemporaneamente per due dmbs 
diversi...
comunque ho risolto con zeoslib...
-- 
maz

 comunque ho risolto con zeoslib...
Imho, se esiste una tecnologia nativa in delphi che funziona non la
mollerei per passare ad altro al 1' intoppo.
Ciao

 mollerei per passare ad altro al 1' intoppo.
eh.. ma in questo caso non funziona (googlando sembra proprio che non si 
possa caricare due librerie) e putroppo non ho molto tempo.. :-(
-- 
maz

Newsgroup: it.comp.lang.delphi
Titolo: Appunti in memoria...

Sapete come potrei creare un "Visualizzatore appunti"?
o meglio... vorrei sapere che formato e che tipo di variabili dovrei usare
per contenere gli appunti del copia incolla... non so se mi sono spiegato
bene, pero' l'idea č quella di poter gestire gli appunti in modo a se
stante, tipo che se volessi potrei anche salvarmi il contenuto in un file...
non so' se esiste un'api o una variabile "universale" che mi possa contenere
qualsiasi tipo di dato "copio", ma al limite mi potete dire, se lo sapete,
quanti (e quali) tipi di variabili dovrei inizializzare per gestire un
"copia & incolla"?
Grazie :)

 "copia & incolla"?
Le operazioni di Copia/Incolla nascondono dietro la loro semplicità di
utilizzo delle tecniche di difficile implementazione, ovvero le tecniche IPC
(Intra/InterProcess Communication).
Non si tratta di "variabili speciali", ma di aree di memoria condivise tra
più processi (*) ... il tuo dato viene spostato in una zona "pubblica" (vedi
Clipboard) e deve essere letto da qualsiasi processo attivo sulla macchina.
La tecniche IPC di più semplice implementazione (ma dal ridotto utilizzo)
sono i messaggi e la clipboard.
I primi sono poco usati perchè si limitano, salvo casi particolari
(WM_COPYDATA su tutti) al trasferimento di 2 interi a 32 bit, la seconda è
poco utilizzata per il fenomeno del memory-overwriting, ovvero tu metti i
tuoi dati nella Clipboard ma nessuno ti garantisce che saranno ancora la
quando andrai a leggerli.
La migliore tecnica IPC (IMHO) rimangono i MMF (Memory Mapped File) che
godono di una gestione tutta particolare.
Ciao! :-)
--
- Carlo -
c.b...@libero.it
(*)  Non è detto che vi sia una area di memoria condivisa, ma è la accezione
più generica per definire il funzionamento di tecniche IPC.
Anche un file su disco può essere una tecnica IPC.

Ummmmm
molto interessante! grazie ci studierò su ;)
Ciao :)
Newsgroup: it.comp.lang.delphi
Titolo: Creazione Setup Applicazione.

Qualcuno mi potrebbe postare quali sono dettagliatamente i passi per poter
creare il setup di un'applicazione sviluppata?
Grazie!

ma non dici:
1) quale programma usi per creare il kit di installazione
2) cosa usa il tuo programma: datbase?bde?ado?dbexpress?odbc?socket?oggetti
com?activex?...
Bye
AS

 ha scritto nel messaggio
news:aepbke$180r$1...@newsreader1.mclink.it...


 ha scritto nel messaggio
news:aepgp2$7h7ic$1...@ID-134361.news.dfncis.de...


Newsgroup: it.comp.lang.delphi
Titolo: Query SQL difficilotta

Ciao a tutti ragà.
Ho due database paradox (DB) uno di 4000 record ed uno di 180000. I due
hanno una struttura quasi simile, ora il mio problema è che dovrei fare una
query UPDATE (tramite SQL explorer) di questo tipo:
UPDATE db1
SET campo1.db1=campo1.db2
FROM db1, db2
WHERE ((db1.campo2=db2.campo2) AND (db1.campo3=db2.campo3))
Insomma devo popolare un campo del database grosso con i valori di un campo
simile del database piccolo.
Il problema è che L'SQL explorer non vuole il FROM dopo l'UPDATE, come fare?
Se facessi questo da codice mi ci vorrebbe un ciclo di 180000 operazioni
ripetuto per 4000 volte, insomma svariate ore e quindi avevo pensato a SQL
explorer.
Secondo voi si può fare? E quanto tempo ci vorrebbe?
Altri consigli?

 WHERE ((db1.campo2=db2.campo2) AND (db1.campo3=db2.campo3))
Prova con
Update DB1 a Set a.Campo1 = (Select b.Campo1 from db2 b, Db1 c where
(c.Campo2=b.Campo2) and (c.Campo3=b.Campo3))
NB
Non testata non so se la sintassi è corretta ... è solo un ipotesi
Saluti NEA

 ha scritto nel messaggio
news:l6ee8.19862$v7.7...@twister1.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: cooltrayicon  icone trasparenti con listimage componet

Ciao A tutti ,
qualcuno sa come rendere trasparenti le immagini associate al
componente cooltryicon tramite una imaglist?
Grazie mille.
Saluti

 componente cooltryicon tramite una imaglist?
Se non mi ricordo male, quando una icona va nella tray, il "grigio windows"
viene considerato il colore trasparente.
In XP però probabilmente il discorso è diverso... passo la palla :)
-- 
Jax
====
Il sesso è sporco solo se fatto bene.

smor...@dartway.com
 ha scritto:

Non conosco nel dettaglio il TCoolTrayIcon, ma generalmente il 
trasparente nelle TImageList, si importa tramite le property BkColor e 
Masked. Di conseguenza dovrebbero recepirlo gli altri controlli...
Ciao,
Gianluca.

 componente cooltryicon tramite una imaglist?
anche io ho lo stesso problema e non riesco a uscirne... per ora me lo devo
sorbire bianco...
-- 
Morde. 
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 lo devo sorbire bianco...
Prova a trasformare il bianco in clSilver...
-- 
Jax
====
Io, grazie a Dio, sono sempre stato ateo. (Luis Brunuel)

 Prova a trasformare il bianco in clSilver...
In che modo? Devo ricavare l' RGB di clSilver e sostituirlo con qualche
image editor?


 qualche image editor?
Esatto. Poi magari non ho capito niente eh :)
Comunque non so come si comporta XP. So che con 98 e 2000, mettendo come
colore di sfondo clSilver, quando andavo a mettere l'icona nel tray,
diventava trasparente.
-- 
Jax
====
L'uomo č certamente pazzo: non sa fare un verme e fa dei a dozzine
(Montaigne)

 (Montaigne)

 che ne pensate?
Non riesco a farlo, seguo scrupolosamente il tuo codice ma l'icona rimane
bianca.
Oltretutto avevo impostato l'icona del programma dalla finestra
Project->Options->Application->LoadIcon e adesso non riesco piu' a
toglierla.


ciao.... a me fuziona....che tipo di icono carichi....? hai provato con
un icona di windows?
Project->Options->Application-­>LoadIcon server per caricare l'icona
di default del programma, mi sa che non puoi rimuoverla ma solo
cambiarla...
Newsgroup: it.comp.lang.delphi
Titolo: Report Builder

Ciao ragazzi ho bisogno di un'informazione...
volevo sapere se Report Builder è un prodotto valido e quali vantaggi
offre..
vale la pena di acquistarlo?
..e poi i reports generati sono esterni all'applicazione? cioe...volendo
modificare un
report ho bisogno di ricompilare il progetto?
..grazie in anticipo a tutti ed in particolar modo a chi vorrà rispondermi!!
ciao..ciao..Raf

modificare un report ho bisogno di ricompilare il progetto?
Non so se sia prevista questa possibilita', io l'ho visto utilizzare
alla stregua di Quick Report, ovvero "internamente".
--
Walkie...@Libero.It (ICQ# 8143647)

 alla stregua di Quick Report, ovvero "internamente".
si possono memorizzare i report (come struttura) su file esterni o su campi
blob, e questo anche nella versione standard. Nella versione pro puo' essere
l'utente stesso a editare la struttura del report a runtime. Nella versione
enterprise lo stesso utente puo' modificare le query, e' presente un
linguaggio esterno pascal-like per riprogrammare il report fuori dall'exe.
Ciao, Sandro

 ha scritto nel messaggio
news:9de8nk$hs93e$1...@ID-43509.news.dfncis.de...


> c'è il link per un report che spiazza tutti e ha un costo per le
FastReport, che e' il sistema di reporting che menzioni nel tuo sito, e'
paragonabile alla versione 3.52 standard di ReportBuilder. Nota che
ReportBuilder e' disponibile in versione standard, pro, ed enterprise, ed e'
arrivato alla versione 5.56, e ha un supporto 24h via newsgroup dedicati, e
si parla direttamente con i programmatori.
Ciao, Sandro

 ha scritto nel messaggio
news:9dt1oc$jt582$1...@ID-43509.news.dfncis.de...


RB?
sì
tuttavia credo che report builder (per sentito dire) sia piu'
professionale e abbia molte piu' features (ovviamante costa molto di
piu'), io dei due ho provato solo FastReport, e l'ho trovato carino e
molto piu' veoce di QR,
la sola cosa che non  mi piace è che gli oggetti usati nella
costruzione, non sono "oggetti"! nel senso che non hanno eventi e
proprietà cambiabili a desgin time, e per cambiare delle prorietà devi
usare FindComponent o simili...
Ciao,
Alan Solo

 ha scritto nel messaggio
news:2DwEO2z6QulTKb...@4ax.com...


Se entri nell'ottica di funzionamento gli altri report li butti via.
approfitto per fari una domandina: hai mai provato fuzzyreport
(freeware) 
http://www.fuzzyreport.shorturl.com
si è distaccato da FastReport, cosa ne pensi?
Ciao,
Alan Solo

 ha scritto nel messaggio
news:66AHO9b==sOtKIpeRBt=J77+...@4ax.com...

Newsgroup: it.comp.lang.delphi
Titolo: Firebird Cancellazione record

Ciao, accedo ad un db Firebird con componenti TIBxxx
Devo fare una cancellazione da una tabella e quindi faccio una semplice
DELETE FROM TABLE
Funziona tutto, solo che devo anche liberare lo spazio che occupavano
i record prima della cancellazione dal file del DB.
Esiste qualche comando SQL o non, per farlo?
Grazie.

 Esiste qualche comando SQL o non, per farlo?
Normalmente, per ottenere lo scopo che ti proponi si utilizza un backup
+ restore, per cui si puo' usare la utility gbak.
Ovviamente nel tempo occorrente per l'operazione non si dovranno avere
connessioni al database (shutdown e rifiuto di nuove connessioni).
Saluti
Paolo Arosio
-- 
"La dimostrazione dell'esistenza di specie intelligenti nell'universo
 e' che non ci vengono a trovare" [Calvin & Hobbes]

 connessioni al database (shutdown e rifiuto di nuove connessioni).
Non e' un problema...
Devo farlo solo una volta pero' non ho creato un backup del DB vuoto.
Ho cancellato tutti i dati ed ora voglio compattarlo.
Come faccio? (non ho mai usato il gBak)
In Oracle esiste un comando "COALESCE" che mi fa questo lavoro sui
tablespaces.
Non c'e' niente di simile?

 Come faccio? (non ho mai usato il gBak)
Puoi usare una delle tante interfacce (free) disponibili per amministrare
Firebird , ad esempio IbOConsole, la trovi su
http://www.mengoni.it/downloads.html
oppure Ibexpert personal edition
http://www.ibexpert.com/
Fare backup e restore che io sappia è l'unico modo.
Giulio

 Come faccio? (non ho mai usato il gBak)
[]
I riferimenti per gbak sono nel file OpGuide.pdf.
[Backup]
<IBPath>\gbak -B -USER SYSDBA -PAS masterkey <srcfile> <destfile>
[Restore]
<IBPath>\gbak -R -USER SYSDBA -PAS masterkey <backupfile> <dbfile>
se vuoi un output di quel che sta facendo il programma aggiungi lo
switch -v prima di USER.
E' buona norma non fare il restore direttamente sul db originale, ma con
un nome differente (si potra' poi cancellare il db originale e
rinominare quello creato dal restore).
Tieni presente che non sempre il backup va a buon fine: si puo' sapere
se il backup e' andato a buon fine solo se il restore e' OK.

Newsgroup: it.comp.lang.delphi
Titolo: TDBLookupComboBox

C'è modo di agire sulla larghezza delle colonne, quando se ne vuole 
mettere più di una?
Nel caso che i campi siano un po' lunghi (che so? 100 caratteri) 
l'effetto è devastante.
Grazie.
Michele Giordano

l'effetto è devastante.
Cantu' nel suo libro suggerisce di lavorare sulla proprieta' ListField,
inserendo i campi separati da ;
es: ListField := 'IdFornitore;RagioneSociale1';
Pero' questo non ti mette al riparo dai field grandi come quello descritto da te.
Anche io mi sono bloccato davanti a questo problema....
Ciao
Morde

 Michele Giordano
Ciao, Antò.


Forse sě!
Grazie davvero.
Michele Giordano

aggiunti tramite il Fields Editor del DataSet.
Sei un grande!
Morde.

Newsgroup: it.comp.lang.delphi
Titolo: Font barcode Ean13

Salve a tutti
mi chiedevo, leggendo il thread precedente sul font barcode
se qualcuno sa dove trovare il font per Ean13 (quello sui libri, per
intenderci).
Ho cercato Google in lungo e in largo ma ho trovato solo font a pagamento.
Grazie
Martina

 intenderci).
Non so se può servire ....
Il generatore di report FuzzyReport ha di serie il componente barcode anche
con la codifica ean13
Giulio

"Martina Locazzo" ha scritto nel messaggio

Io l'ho trovato qui:
http://grandzebu.net/informatique/codbar/EAN13.ttf
vedi se è quello che cerchi.
Per l'utilizzo vale il solito discorso: lo installi e poi cambi il nome font
delle label che ti interessa visualizzare come barCode
Ciao,
Gianluca.

...

Take a look at 
www.morovia.com/font/ueb.asp

Newsgroup: it.comp.lang.delphi
Titolo: D8: dove comprarlo online?

Ciao a tutti
quale č il vostro negozio online di fiducia per acquistare D8 (upgrade)?
io solitamente utilizzo eprice ma al momento lě tale versione non sembra
ancora disponibile
grazie in anticipo per dritte ed info


Io di solito compro qui: 
http://shop.pc-ware.it/pcw/index.asp
-- 
"La velocità luce non è sufficiente Comandante Nunziatella, 
dobbiamo passare alla velocità smodata!"

http://www.consist.it/
ciao
Newsgroup: it.comp.lang.delphi
Titolo: Impostazione FULL SCREEN

Come posso fare ad utilizzare una impostazione che io definisco "FULL
SCREEn" come quella utilizzata dai giochi o dagli screen saver?? Ad esempio
nei giochi sembra che quella modalità non sia una finestra di Windows e che
il programma abbia il controllo completo della macchina (ad esempio spesso
non si può passare ad altre applicazioni )....
Grazie in anticipo .

Ciao,
Lale ha scritto:

credo che ci sia una finestra, magari senza bordi !!
Per evitare di richiamare altre applicazione, dovresti bloccare lo
combinazioni di sistema come la CTRL + ALT + CANC, ALT + TAB e CTRL + ESC
In questo modo il gioco o quello che sia rimane l' applicazione
"prioritaria".
Per bloccare le combinazioni che ti ho suggerito, usa l' API
"SystemParamatersInfo" (mi pare questo il nome......forse ho scritto qualche
lettera male).
Sotto Windows NT è un po' più complicato e certe combinazioni di tasti,
risultano complicate da bloccare.
Ti saluto.....ciao !!
Antonio Tarolla
BSSoftware Tips Mailing - List Support

non si può passare ad altre applicazioni )....


Newsgroup: it.comp.lang.delphi
Titolo: Ricerca in TADOTable

Salve a tutti volevo sapere come posso effettuare una ricerca in TADOTable,
poichè avendo usato sempre TTable per DB in Paradox trovo difficolta ad
eseguire le ricerche.
Table1.FindKey := Edit1.Text;
TADOTable.?????????? := Edit1.Text;
?????????? = Cosa devo inserire?
Grazie
--------------------------------
Inviato via 
http://usenet.libero.it


prova con fieldbyname...
cerca sulla guida in linea per maggiori info.
ciao!

usa la funzione Locate
--
_________________________________
Edmondo Di Tucci 
snar...@tin.it
www.powernetsi.it
 
edm...@powernetsi.it
Newsgroup: it.comp.lang.delphi
Titolo: [d5][d6] consiglio su scelta database

ciao a tutti, dovendo fare il porting di un applicazione delphi5 con paradox 
verso un sistema più solido vi chiedo una vostra opinione, tenendo conto 
che:
-gli utenti finali possono avere un singolo pc oppure una serie di pc 
collegati in rete con o senza server (max 7/8 postazioni)
-l'applicazione è un gestionale con clienti e dettaglio acquisti clienti, 
magazzino, ecc.
-attualmente alcuni utenti preferiscono lavorare su harddisk esterno (usb o 
firewire) o pendrive quindi servirebbe la possibilità di avere i dati anche 
su cartelle diverse
cosa mi consigliate?? io pensavo a interbase 6.0 che è free e lavora su file 
.gbk, però ho visto che molte software house utilizzano msde o addirittura 
mssql... e se fosse mysql???? (visto che già lo uso su altre applicazioni 
con gli zeos components)
Simone 

cosa mi consigliate?? io pensavo a interbase 6.0 che è free[...]
Interbase 6.0 è obsoleto, buggato, dismesso.
MySQL è buono, ma l'uso commerciale è vincolato da licenza.
Firebird 2.0 è free, open-source e gratuito, quindi può essere
un'alternativa, ma io ti consiglio il top, che secondo me è
PostgreSQL, ora in versione nativa anche per Windows.  E' solido,
gratuito, liberamente distribuibile.

grazie per il consiglio... se decidessi di usare firebird dentro delphi che 
componenti uso? quelli di interbase?
Simo 

 gratuito, liberamente distribuibile.
E con che componenti ci accedi ?
Guido

> .. ma io ti consiglio il top, che secondo me č


 E con che componenti ci accedi ?
ODBC/ADO sicuramente, poi ci saranno anche altri componenti che non
conosco.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 componenti uso? quelli di interbase?
Quelli IB sono compatibili, ma non so fino a quando, sinceramente.
Anche con dbExpress, utilizzando il driver per Interbase ci si accede.
In alternativa ci sono gli UIB che sono free e valgono sia per IB che FB o
i FIB+ che però sono a pagamento.


 Quelli IB sono compatibili, ma non so fino a quando, sinceramente.
Mmmmm in alcune nostre applicazioniad alcuni nuovi clienti 
abbiamo installato firebird e non hanno rilevato nessun 
problema, sebbene usino un db di ib 6.0
ciao

problema, sebbene usino un db di ib 6.0
In Firebird è prevista compatibilità all'indietro, ma il supporto
andrà sicuramente scemando nel tempo.  Io suggerisco di scalare la
vostra base dati verso Firebird e utilizzare per l'accesso componenti
ambivalenti, come UIB.  Io l'ho già fatto presso un cliente: prestando
particolare attenzione, non ci sono problemi.
Newsgroup: it.comp.lang.delphi
Titolo: Tasto TAB

Ho questo problema:
non riesco ad intercettare il tasto TAB: ho provato ad utilizzare VK_TAB 
inutilmente. Vorrei inotre poter intercettare anche Shift-TAB ma non
riuscendo ad intercettare il primo, non posso farlo.
E' possibile farlo?
Grazie per la collaborazione
Maurizio

 ha scritto nel messaggio
news:39853D4B...@fisquick.it...


 > Maurizio
Maurizio

>
Ho questo problema:
non riesco ad intercettare il tasto TAB: ho provato ad utilizzare VK_TAB
inutilmente. Vorrei inotre poter intercettare anche Shift-TAB ma non
riuscendo ad intercettare il primo, non posso farlo.
E' possibile farlo?
<<
Si'. Prova a cercare il thread "proprietą Color" di solid snake. E' in
ballo la gestione dei msg di Delphi (in particolare CM_COLORCHANGED) e
WMGetDlgCode. Dall'ultimo suo post:
"Un codice di esempio lo si puņ trovare nella unit StdCtrls nel
componente
TCustomMemo".
hth
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: Scrivere e simulare pressione tasto in un sito

Salve a tutti, vi faccio subito un esempio con TWebbrowser carico la pagina
www.google.it
, come faccio da codice a scrivere nel campo di ricerca e a
simulare la pressione del tasto "Cerca con Google" o "Mi sento fortunato"?
E' solo un esempio, ma in pratica come si interagisce co le pagine WEB?
Serve qualche componente in particolare invece di Twebbrowser?
Grazie a quanti mi aiuteranno!!

 ha scritto nel messaggio 
news:rEqkd.150718$b5.74...@news3.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: Licenze Delphi-Excel

Se un programmino scrive in un foglio Excel (modello) con le applicazioni
server di Delphi 5, quali licenze sono necessarie per vendere programmino e
modello?
Grazie.
        BedBaol

Quella di delphi, che dovresti gia' possedere con delphi stesso.

 Quella di delphi, che dovresti gia' possedere con delphi stesso.
OK.
Grazie.
          BedBaol

Quella di delphi, che dovresti gia' possedere con delphi stesso.
magari allude alla distribuzione del modello office.
-- 
.     _  _______  ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_
  /| // /__  __/  Kirys <My e-mail is a working antispam e-mail>
 / |/ \   / /     Kirys Tech 2000: 
http://www.kt2k.com
/__|\__\ /_/ 2000 ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_

magari allude alla distribuzione del modello office.
probabilmente si, il discorso non cambia.
--
Morde. 
morde[at]programmer[.]net

probabilmente si, il discorso non cambia.
ovvero non c'e' bisogno di licenza particolare per distribuire
template/file excel/access/word per scopi commerciali? (lo chiedo
perche' la cosa mi interssa :D)


perche' la cosa mi interssa :D)
Imho e' sufficente avere l'applicazione "madre" (es. Acces per mdb, Word per i
.doc,.dot, ecc).
A tal proposito si e' discusso molto in passato, cerca in google groups.
Ciao


Newsgroup: it.comp.lang.delphi
Titolo: Eventi Campo LookUp

In una DBGrid ho un campo LookUp settato come Auto
dopo la selezione vorrei fare avanzare alla colonna successiva,
ma il campo LookUp non ha Eventi.
la versione Delphi e' 4 patchato alla 4.03 come si puo' fare ?
Altra rognetta e' che un Campo DbLookUpCombo , mi mantiene
il fuoco (anche se forzo DBGrid1.SetFocus) , fino a quando non
clicco sulla DbGrid.
grazie Maurizio

grazie Maurizio
	Ciao
	MassimoB
 
---------------------------
http:\\
www.massimobeschi.it
Newsgroup: it.comp.lang.delphi
Titolo: CDS, ADO e Access

Ciao a tutti,
ho la seguente configurazione :
CDS --> Provider --> TADOQuery
con db Access.
Tramite un DataSource visualizzo i dati su una DBGrid.
Ho dato la possibilità all'utente di inserire, modificare, cancellare
i dati
direttamente dalla griglia, utilizzando i metodi POST e DELETE del CDS.
Però ci sono vari problemi :
1. all'ApplyUpdate se c'è un'errore del tipo : Chiave Primaria
Duplicata,
Record relazionato etc etc... mi viene comunicato l'errore e poi il
programma
non si riprende più, si "intomma" e devo solo resettare dall' IDE (Run
--> Program Reset).
2. in modifica molte volte mi da l'errore : "record not found ...."
anche se sul provider ho
impostato come metodo di Update = upWhereKeyOnly e alla creazione dei
vari fields
chiave imposto ProviderFlags = [pfInUpdate, pfInKey]
Qualcuno mi da una mano?
Grazie in anticipo
Rino

 Rino
Ciao, Antò.
Inviato da X-Privat.Org - Registrazione gratuita 
http://www.x-privat.org/join.php

 nella tabella non c'è una chiave primaria impostata
io uso TADOQuery ma ho provato anche con il DataSet, ma nulla...
Sulla tabella la chiave primaria c'è...
Ragazziiiiii... help me
Ciao e Grazie
Rino.
Newsgroup: it.comp.lang.delphi
Titolo: Problema utilizzo molti controlli

Salve a tutti,
ho la necessità di utilizzare in un progetto molte ComboBox ed Edit,
all'incirca 300.
Ho notato però che quando mi avvicino alle 150 lanciando in esecuzione va in
crash tutto.
Ho fatto il seguente test ho realizzato una applicazione costituita da un
Form principale che richiama altri 5 Form, all'interno dei quali ho disposto
150 Combo-Edit (nota senza alcun parte di codice, cioè solo parte visuale) .
Quando lancio in esecuzione all'interno dell'IDE dopo che apro qualche form
si pianta tutto.
Quando lancio in esecuzione il progetto senza l'ambiente di sviluppo, dopo
che apro qualche form,  ottengo il messaggio 'A win32 function failed'.
Questa problematica l'ho riscontrata sia con Delphi4 Standard che con
C++Builder4 Professional con O.S. Win98 e WinMe.
E' un limite dell'ambiente?
Qualcuno sa darmi qualche dritta?
Grazie
  Simone

 Qualcuno sa darmi qualche dritta?
Magari postami (alla mia mail) il programma test che ci do' un'occhiata...
Ciao
Matteo

 Qualcuno sa darmi qualche dritta?
Hai tutti i controlli direttamente sul form?
Prova ad usare un pacge control e a dividerli sulle sue pagine.
Prova a crearne 3 x iniziare, mettendo 50 oggetti per ogni tabsheet.
Infine, togli tutto dalla' autocreate, lasciando solo ilm minimo, ovvero
mainform + eventuale datamodule principale della tua app
Si tratta di una app per prodotti farmaceutici?
Bye
A.

 ce ne siano in VB sul limite di controlli)
vb non accetta + di 230 controlli circa in un form.
Se ne vuoi di + devi usare quella robaccia degli array di controlli: bleah!
A.

 che apro qualche form,  ottengo il messaggio 'A win32 function failed'.
Sei assolutamente sicuro che il problema sia dovuto ai troppi componenti?
Mi sembra strano che un' applicazione non riesca a gestire questi
componenti. Inoltre mi puzza quel "a win32 function failed" poichè non
fornisce nessuna informazione.
Prova a mettere il tutto in un blocco try - except e quando viene sollevata
un' eccezione richiama RaiseLastWin32Error() (che è una combinazione di
FormatMessage() e GetLastError())
Ciao
--
- Carlo -
cbertu81(at)libero(dot)it

Prova a creare i componenti (i combobox ecc...) a run-time e
tenerti i puntatori in una lista o array e vedi se anche così ti dà errore.
Magari provi a crearne un po' alla volta tipo 10 al colpo finchè non si
pianta tutto...

Si tratta di una app per prodotti farmaceutici?
No, è una shell di programmazione di un PABX
Grazie a tutti per la collaborazione e scusate se quoto male ma non sono un
frequentatore assiduo di newsgroup

> No, è una shell di programmazione di un PABX
scusami: che kakkio è un PABX?
Bye
A.

 volgarmente centralino telefonico,
Ma avete mai notato quanto i termini inglesi siano pompanti?
Basta vedere il fottio di "System engineer" e robe del genere...
E poi i nomi...
Bill Gates -> Guglielmo Cancelli
Tom Cruise -> Tommaso Crociera
Julia Roberts -> Giulia Roberti
Steven Seagull -> Stefano Gabbiano
Steve Jobs -> Stefano Lavori
George Bush -> Giorgio Cespuglio
--
Jax
Newsgroup: it.comp.lang.delphi
Titolo: Delphi XE5 - Android - Creare file zip

Salve gente!
Premetto che ho cercato su google e non ho trovato niente in 
merito....(magari sono rimbambito....).
Sto cercando un modo per creare un .zip di alcuni files che sono nella 
sdcard....idee in merito? qualche componente (possibilmente free) da 
usare? qualche "uses"? qualche funzione che mi sfugge....
 
Grazie infinite a tutti!

 usare? qualche "uses"? qualche funzione che mi sfugge....
 
Ciao,
dovresti andare su Torry ( 
http://www.torry.net/index.php
 ) e inserire la parola "zip" nel campo "Quick Search" e vedrai quanti componenti free trovi.
 
Ciao da Giudici Enrico c/o Anthelios


per il deploy su android non c'è un piffero :°(     (o son cecato 
io....probabile!)
Newsgroup: it.comp.lang.delphi
Titolo: drag

scusate, come faccio a fare il drag tra un edit box ed un altro, l'help mi
dice di mettere o drag automatico (ma appena vado col mouse sopra il box il
puntatore da divieto) oppure manuale, e devo far partire la BeginDrag, ma
non funziona, dopo cosa dovrei fare?
non c'č nessun esempio

 wrote in message
27_I6.20791$UW4.1...@news.infostrada.it...


 ha scritto nel messaggio
news:27_I6.20791$UW4.1...@news.infostrada.it...

Eventi OnDragOver, OnDragDrop

Ti posto una cosa funzionante, ricordati di impostare la proprietà DragMode
dei due Edit a "dmManual".
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;
type
  TForm1 = class(TForm)
    SorgEdit: TEdit;
    DestEdit: TEdit;
    procedure SorgEditMouseDown(Sender: TObject; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
    procedure DestEditDragOver(Sender, Source: TObject; X, Y: Integer;
      State: TDragState; var Accept: Boolean);
    procedure DestEditDragDrop(Sender, Source: TObject; X, Y: Integer);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.SorgEditMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  { La BeginDrag prende un parametro di tipo Boolean,
    chiamato Immediate. Questo parametro serve a
    determinare se bisogna iniziare il "drag" subito oppure
    no. C'è inoltre un parametro opzionale
    ( chiamato Threshold ) che permette di stabilire di
    quanti pixel si deve spostare il puntatore del mouse
    prima che inizi il drag. }
  SorgEdit.BeginDrag( False );
end;
procedure TForm1.DestEditDragOver(Sender, Source: TObject; X, Y: Integer;
  State: TDragState; var Accept: Boolean);
begin
  { Qui stabiliamo quali controlli possono essere "droppati"
    sull'edit di destinazione.
    Guardando la lista dei parametri, nota il "var Accept : Boolean".
    Quel parametro ti permette di scegliere se accettare o no il
    drop di un controllo. Questo lo puoi decidere ogni volta che
    viene scatenato l'evento. Quindi puoi impostare molte diverse
    condizioni per un singolo controllo }
  if Source is TEdit then
  begin
    if TEdit( Source ).Name = 'SorgEdit' then Accept := True;
  end;
end;
procedure TForm1.DestEditDragDrop(Sender, Source: TObject; X, Y: Integer);
begin
  // Necessita spiegazioni? :=)
  DestEdit.Text := TEdit( Source ).Text;
end;
end.

 ha scritto nel messaggio
news:2ChJ6.7005$DF1.1...@news1.tin.it...
