Italian community of Lazarus and Free Pascal
Programmazione => Generale => Topic aperto da: ivanomonti - Dicembre 12, 2011, 12:24:46 pm
-
Ho un amico che sta bestemmiando per usare questo BGRABitmap che non ho idea che sia, mi potete dare una spiegazione di come usarlo o avere un esempio pratico.
grazie.
-
Prova con questo
http://wiki.lazarus.freepascal.org/BGRABitmap
-
Grazie stavo leggendo ma io ho errore sul ide nella quale non trova riferimenti a BGRABitmap, BGRABitmapTypes che credo siano dll
non so dove scaricarli e dove devo metterli.
ho cercato e installato LazPaint ma delle dll nessuna traccia, mi sto perdendo in un bicchiere d'acqua.
Altro aiuto grazie infinite.
-
Fai copia e incolla dell'errore.
-
Errore arriva dove e evidenziato, e quello che vorrei fare funzionare e la function rossa, copiata dal manuale.
errore = unit1.pas(9,38) Fatal: Can't find unit BGRABitmap used by Unit1
codice sperimentale =
unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
ExtCtrls, ComCtrls, PopupNotifier, BGRABitmap, BGRABitmapTypes;
type
{ TForm1 }
TForm1 = class(TForm)
Edit1: TEdit;
Message: TButton;
Start: TButton;
ProgressBar1: TProgressBar;
Timer1: TTimer;
procedure FormCreate(Sender: TObject);
procedure MessageClick(Sender: TObject);
procedure Shape1ChangeBounds(Sender: TObject);
procedure StartClick(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
private
{ private declarations }
public
{ public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.lfm}
{ TForm1 }
procedure TForm1.FormPaint(Sender: TObject);
var bmp: TBGRABitmap;
begin
bmp := TBGRABitmap.Create(ClientWidth, ClientHeight, BGRABlack);
bmp.FillRect(20, 20, 100, 40, BGRA(255,192,0), dmSet); //fill an orange rectangle
bmp.Draw(Canvas, 0, 0, True); //render BGRABitmap on the form
bmp.Free; //free memory
end;
procedure TForm1.MessageClick(Sender: TObject);
begin
ShowMessage( Edit1.Text );
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Timer1.Interval:=100;
Timer1.Enabled:=false;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if ProgressBar1.Position>99 then
begin
ProgressBar1.Position:=0;
end
else
begin
ProgressBar1.Position:=ProgressBar1.Position+1;
end;
end;
end.
-
Al fondo del link che ti ho postato prima c'è la sezione download da cui ti dice di scaricare LazPaint e il componente che vuoi usare. Scaricali entrambi, installali entrambi e poi dovrebbe funzionare!
-
Al fondo del link che ti ho postato prima c'è la sezione download da cui ti dice di scaricare LazPaint e il componente che vuoi usare. Scaricali entrambi, installali entrambi e poi dovrebbe funzionare!
ho scaricato ma non ho capito come installarli, cioè LazPaint si è installato sulla directory ma le librerie le ho messe a mano sulla directory C:\lazarus\components\brgabitmap sperando che vada bene, ma il problema persiste.
-
Leggi questo How To
http://www.lazaruspascal.it/index.php?page=44
-
Leggi questo How To
http://www.lazaruspascal.it/index.php?page=44
OK risolto, era un problema di solito pasticcio, reinstallato il pacchetto e tutto a funzionato, devo entrare nella logica.
-
Perfetto :)
-
Voglio cmq dire che dovrebbero fare una giuda anche in italiano, perchè ad esempio io non leggo molto inglese (mia pecca) ma i concetti in italiano sono diversi da quelli inglesi, loro con 1 parola danno milioni di significati, noi con milioni di parole diamo un milione di significati.
Vabbè ora mi devo dilettare su connessioni db mysql e sqlite, vediamo che si fa, solita richiesta esempi dove si trovano, inoltre esiste un calderonedove buttare esempi freschi!!!
ciao a tutti e grazie per la vostra pazienza.
-
Allora per fare degli esempi e postarli dovete far richiesta di diventare utenti "Scrittori" nell'aposito 3d (nella sezione generale), quindi potete anche scrivere nella sezione How To. Per quanto riguarda sqllite funziona tutto alla grande. Mentre per MySql ho avuto brutte esperienze, sono riuscito a farlo funzionare solo con gli ODBC. Perciò nei miei progetti ho sostituito MySql con firebird che va alla grande!
-
apriamo altra discussione sqlite, può essere utile :)
-
ok