Наши преимущества

Компоненты для Delphi/C++Builder ~ Components for Delphi/C++Builder 6

Статус
Закрыто для дальнейших ответов.
Ага, желательно 8.2

Добавлено через 4 минуты
Нужен ODAC 8.2
 
Последнее редактирование модератором:
Cindy V5.06 released!

Как увидеть ссылки? | How to see hidden links?

Need export BDE table or any dataset to mysql?
Use my new TcyDBXImportDataset component!

Sample code:
uses BDE;

cyDbxImportDataset1.Dataset := ParadoxTable;
cyDbxImportDataset1.TableName := MySQLTableName;
cyDbxImportDataset1.PrimaryKey := 'Id' + MySQLTableName;

// Correct fields size :
try
TabProp := TFrmBDEDataset(FrmPrin.ActiveMDIChild).TbFile;
pFlds := AllocMem((TabProp.FieldCount + 1) * sizeof(FLDDesc));
FillChar(pFlds^, (TabProp.FieldCount + 1) * sizeof(FLDDesc), 0);
Check(DbiGetFieldDescs(TabProp.handle, pFlds));

for f := 0 to TabProp.FieldCount-1 do
begin
FieldIndex := cyDbxImportDataset1.Fields.FindFieldIndex(TabProp.Fields[f].FieldName);

if f <> 0 then
Inc(pFlds, 1);

{ Case pFlds^.iFldType Of
1: StringGridProps.Cells[2, StringGridProps.RowCount-1] := 'String';
2: StringGridProps.Cells[2, StringGridProps.RowCount-1] := 'Date';
3: StringGridProps.Cells[2, StringGridProps.RowCount-1] := 'Memo';
4: StringGridProps.Cells[2, StringGridProps.RowCount-1] := 'Bool';
5: StringGridProps.Cells[2, StringGridProps.RowCount-1] := 'Integer';
6: StringGridProps.Cells[2, StringGridProps.RowCount-1] := '???';
7: StringGridProps.Cells[2, StringGridProps.RowCount-1] := 'Float';
Else
StringGridProps.Cells[2, StringGridProps.RowCount-1] := 'Ché pas';
End; }

if pFlds^.iFldType in [1, 5, 7] then
cyDbxImportDataset1.Fields[FieldIndex].FieldType.Size := pFlds^.iUnits1;

if pFlds^.iFldType = 7 then // Floats
begin
cyDbxImportDataset1.Fields[FieldIndex].FieldType.Precision := pFlds^.iUnits2;

// Convert Float fields without decimals to an Integer:
if cyDbxImportDataset1.Fields[FieldIndex].FieldType.Precision = 0 then
cyDbxImportDataset1.Fields[FieldIndex].FieldType.DataType := ftInteger;
end;
end;
finally
pFlds := Nil;
FreeMem(pFlds);
end;

// Create table :
cyDbxImportDataset1.CreateTable;

// Export records :
if CBExportRecords.Checked then
begin
Screen.Cursor := crHourGlass;
cyDbxImportDataset1.Dataset.DisableControls;
cyDbxImportDataset1.ImportRecords;
cyDbxImportDataset1.Dataset.EnableControls;
Screen.Cursor := crDefault;
end;



Mauricio
 
TMS WebGMaps v1.0.2.0

Different map modes are available: default road map, satellite view, hybrid view and terrain
Extra map information can be displayed: Bicycle View, Panoramio (pictures of interest) information, Traffic information
StreetView can be selected
Position markers may be added to the maps, including default Google balloon markers and custom image markers.
Moving over a marker can display a hint with the marker title information
Extensive configuration options over the different Google maps controls are available: MapType control, OverViewMap control, Pan control, Scale control, StreetView control and Zoom control.
Image files can be created of the displayed map. Images can be saved in different formats: .BMP, .JPG or .PNG
Different mouse and keyboard options to enable/disable: mouse or keyboard panning, mouse or keyboard zoom, mouse wheel scrolling
TWebGMapsGeocoding helper component to facilitate conversions between address and longitude/latitude coordinates

Как увидеть ссылки? | How to see hidden links?
 
Залейте плиз у кого есть
/n software PayPal Integrator Delphi Edition
/n software E-Payment Integrator Delphi Edition
/n software E-Banking Integrator Delphi Edition
 
Доброго времени суток.
Поделитесь, пож, патчиком для devexpress 2012.1.5 для xe2.
Или киньте ссылочку на full source.
Благодарствую


В качестве благодарности за full source возьмусь русифицировать
 
Последнее редактирование модератором:
Статус
Закрыто для дальнейших ответов.
Верх